Anzeige
Archiv - Navigation
1488to1492
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
Inhaltsverzeichnis

will doch nur transponieren:/

will doch nur transponieren:/
18.04.2016 20:23:04
BlueBull
Hallo zsm,
könnte mir vllt jemand weitter hilfen, Ich wollte eigentlich nur den ersten code unwandln. Er soll anstatt in der ausgewählten Zeile, Spalte 63 in der ausgewählten Spalte, Zeile 7 gucken ob eine Null steht. Egal wie ich es versuche und tausche es klappt nicht.
Über Hilfe würde ich mich freuen.
Urpsürunglich
###########################################################
Dim r As Range
Dim Zelle As Range
Set r = Intersect(Selection, Range("K17:BH424"))
If Not r Is Nothing Then
For Each Zelle In r
If Cells(Zelle.Row, 62) = 0 Then
If OptionButton1 = True Then Zelle.Value = "U ?"
etc....
End If
Next
###########################################################################
Mein Versuch
###########################################################################
Dim r As Range
Dim Zelle As Range
Set r = Intersect(Selection, Sheets("Urlaubsplanung").Range("Eingabebereich"))
If Not r Is Nothing Then
For Each Zelle In r
If Cells(6, Zelle.Column) = 0 Then
etc...
End If
Next
#######################################################################

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: will doch nur transponieren:/
18.04.2016 20:29:01
BlueBull
Hat sich erld. :D trotzdem Danke...
Musste Zeile 7 angeben.. dachte im VBA muss man immer eine Abziehen :/
If Cells(7, Zelle.Column) = 0 Then
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige