Macro unter excel 2010 erstellenGeschlossen

Question

Guten Tag, 


Ich beherrsche überhaupt nicht Excel.
Um meine Aufgabe leicht zu machen, ich möchte einen macro erstellen, der für eine Datum-Format "01/02/2010" eine Wert 1 ausgibt .
Ich bin mir nicht sicher ob ich klar genug war...
Nun wir werden sehen.

danke im voraus !!!

schwertfisch · Answer

Hallo,
ich habe nicht alles ganz verstanden, aber folgendes ein ähnliches Beispiel:

Diese macro gibt 1 in der Spalte C aus, falls das Datum von der Spalte B Montag oder Freitag wäre.

Sub montag_freitag() 
Dim lezte As Integer 
Dim tag_woche as Byte
Dim t_date, t_out 

letzte = Cells(Rows.Count, 2).End(xlUp).Row 
t_date = Application.Transpose(Range("B3:B" & fin)) 

ReDim t_out(1 To UBound(t_date)) 
For cptr = 1 To UBound(t_date) 
    tag_woche  = Weekday(t_date(cptr), 1) 
    If t_date(cptr) > 30000 And (tag_woche  = 6 Or tag_woche  = 2) Then 
        t_out(cptr) = 1 
    End If 
Next 

Application.ScreenUpdating = False 
Range("C3:C" & UBound(t_out)) = Application.Transpose(t_out) 
End Sub

Macro unter excel 2010 erstellen

1 Antwort

Ähnliche Threads