Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
216to220
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Problem mit VBA-CODE

Problem mit VBA-CODE
12.02.2003 11:03:28
thorsten gerber
Hallo Excler,
habe wieder (immernoch) ein Problem mit nachfolgendem Code:
Dim bMonat As Byte
Dim bCount As Byte
Dim bFraMonat As Byte
For bFraMonat = 9 To 10
If IsEmpty(Cells(19, bFraMonat)) Then Exit Sub
bMonat = Month(CDate("01." & Cells(19, bFraMonat) & ".2001"))
For bCount = 24 To 23 + [f17]
Select Case bFraMonat
Case Is = 9
With Cells(bCount, 4)
If Month(.Value) = bMonat Then
.Offset(0, 1) = 1
Else
.Offset(0, 1) = ""
End If
End With
Case Is = 10
With Cells(bCount, 4)
If Month(.Value) = bMonat Then
.Offset(0, 1) = 1
End If
End With
End Select
Next
Next
Habe schon in den letzten Tag ein paar Hilfen bekommen, kann leider nicht mehr den alten Thread finden.
Bekomme immer eine Fehlermeldung= Typen unverträglich. Was soll der Code tun ? In der Zelle i19 und j19 stehen die Monatsnamen ausgeschrieben (Bsp.: Januar), diese sollen mit einer Zelle, in welcher das Datum steht (Bsp.: 01.01.2003) abgelichen werden. Wenn der ausgeschriebene Monat und das Datum übereinstimmen (Januar -> 01.01.2003 - nur der Monat), soll in einer bestimmten Zelle eine 1 ausgegeben werden. Wer kann mir helfen ??? Danke und Gruss Thorsten

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Problem mit VBA-CODE
12.02.2003 11:48:12
wolfi

hallo,

versuch mal mit der Funktion "Format"

gruß
wolfi

Re: Problem mit VBA-CODE
12.02.2003 12:17:23
thorsten

Ich bin Anfänger. Wo soll ich "format" einsetzen/ einfügen ???

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige