Function Cells2Range(Zeile, Spalte)
Spalte = Columns(Spalte).Address(False, False)
Spalte = Left(Spalte, InStr(Spalte, ":") - 1)
Cells2Range = Spalte & Zeile
End Function
Sie müssen nur anstatt von 1,1 ihre Zeilen- und Spaltennummer eingeben, die Sie in die Range-Schreibweise umwandeln wollen. Die Prozedur "umwandel" ruft die Funktion "Cells2Range" mit Angabe der Zeilen- und Spaltenummer auf und liefert als Ergebnis die gewünschte Range-Schreibweise zurück.
101084 Dieser Code trennt die Angabe der Adresse C15 in die Spalte C und in die Zeile 15. Die Trennung erfolgt mit der...
Das folgende Makro wandelt den Text im markierten Bereich in Kleinbuchstaben um. Es werden allso alle Buchstaben als...
Mit diesem Makro können alle Hyperlinks eines definierten Zellbereichs ausgelesen werden. Das Makro durchforstet in diesem...
Arbeit mit der letzten Zeile, Spalte oder Zelle in Excel – praktische Makro-Beispiele Wenn Sie regelmäßig mit Excel...
Einfügen in Tabellenblatt (nicht Code-Modul) Mit diesem Code können Änderungen live in einer Spalte dokumentiert werden....
Excel automatisieren. Zeit sparen.
Fehler vermeiden.
Wir entwickeln Ihre individuelle
Excel- / VBA-Lösung.
Jetzt anfragen!
Anfrageformular öffnen 
Jetzt anrufen: +49 (0)151 164 55 914 
Anfrage per E-Mail senden 
Weitere Informationen 