Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellenbezug Address in variable aufteilen

Zellenbezug Address in variable aufteilen
18.08.2006 13:59:40
Bengel
Hallösche
Ich will einen Zellenbezug in 2 variablen zerlegen um diese dann mit Cells benutzen zu können
For Each Zelle In Selection
If Zelle.Value = "" Then
Else
MsgBox Zelle.Address
y = Zelle.Address
wenn ich das obige Beispiel ausführe hab ich ja in der Variable y als Beispiel sowas wie $R$16
Ich suche jetzt eine Möglichkeit die werte R und 16 da rauszubekommen und die dann
im Cells - Befehl zu verwenden.
Habe mir gedacht mit Len das ganze zu zerlegen aber das wird dann glaube ich recht umständlich oder vor allem wenn die Zellbeüge dann unterschiedlich werden 1 oder mehrstellig ?
Gruß Bengel
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellenbezug Address in variable aufteilen
18.08.2006 14:35:33
Heiko
Hallo Bengel,
warum den so kompliziert ?!

Sub Test()
Dim zelle As Range
For Each zelle In Selection
If zelle.Value = "" Then
' Tu dies
Else
MsgBox "Zeile  = " & zelle.Row
MsgBox "Spalte = " & zelle.Column
End If
Next
End Sub

Gruß Heiko
PS: Rückmeldung wäre nett !
Anzeige
AW: Zellenbezug Address in variable aufteilen
18.08.2006 16:35:57
Bengel
Dankeschön klappt prima und so einfach :-)
Ich hätte da weis Gott wie geleftet und gerightet und rumgeschoben..
Merci
AW: Zellenbezug Address in variable aufteilen
18.08.2006 14:39:26
Peter
Hallo Bengel,
so:

Sub Test()
Dim Zelle    As Range
Dim iSpalte  As Integer
Dim lZeile   As Long
For Each Zelle In Selection
If Zelle.Value = "" Or _
Len(Trim(Zelle.Value)) = 0 Then
Else
MsgBox Zelle.Address
iSpalte = Zelle.Column
lZeile = Zelle.Row
MsgBox "Address = " & Zelle.Address & " Spalte = " & Zelle.Column & _
" Zeile = " & Zelle.Row
End If
Next Zelle
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
AW: Zellenbezug Address in variable aufteilen
18.08.2006 16:38:34
Bengel
Dankeschön klappt auch prima
was macht den der Len Trim Befehl ist das noch eine zusätzliche sicherheit das die zelle wirklich leer ist?
Gruß Bengel
AW: Zellenbezug Address in variable aufteilen
18.08.2006 18:01:39
Peter
Hallo Bengel,
wenn in der Zelle ein Leerzeichen steht, kannst du es mit If Zelle = "" nicht finden.
Aber mit Trim werden führende und nachfolgende Leerzeichen aus einer Zelle entfernt.
Das heißt " Hugo " wird durch Trim zu "Hugo".
Wenn nun eine so geleerte Zelle die Länge Null hat, ist sie leer.
Viele Grüße Peter
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige