Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
492to496
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
492to496
492to496
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Text/Zahlenwert veraendern

Text/Zahlenwert veraendern
29.09.2004 08:27:51
Alexej
Guten Morgen allerseits :)
Ich habe eine Spalte in meinem Excelinstrument, dort befinden sich Zellenkoordinaten, z.B.
A10
B10
C10
...
...
...
BT43
BU43
...
...
Nun moechte ich in diesen Koordinaten den Zeilenwert um zwei erhoehen, d.h.:
A12
B12
C12
usw.
Wie koennte ich dies loesen?
Vielen Dank im Vorraus,
Alexej

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text/Zahlenwert veraendern
29.09.2004 08:32:25
Timmy@Southpark
du könntest alle buchstaben in spalte a lesen und alle ziffern in spalte b dann ist es kein problem mehr. nur mal ein denkanstoß...
gruß
timmy
AW: Text/Zahlenwert veraendern
Alexej
Hi Timmy,
Leider habe ich sowohl die einzelne Buchstaben, als auch Buchstabenkombinationen...
Gruss,
Alexej
AW: Text/Zahlenwert veraendern
29.09.2004 08:58:53
Mac4
Hallo Alexej,
bin mir nicht sicher, ob die Lösung nicht von hinten durch die Brust in Auge geht (sprich tierisch kompliziert), aber sie funktioniert:

Sub test()
Dim i, sp, rw
For i = 1 To [A65536].End(xlUp).Row
sp = WorksheetFunction.Substitute(Cells(1, Range(Cells(i, 1)).Column).Address(False, False), 1, "")
rw = Range(Cells(i, 1)).Row + 2
Cells(i, 2) = sp & rw
Next
End Sub

Marc (aus Köln)
Anzeige
Danke sehr!
Alexej
Es funktioniert wundebar))
Viele Gruesse aus Moskau,
Alexej

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige