Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1304to1308
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

String an 2.Stelle abschneiden

String an 2.Stelle abschneiden
09.04.2013 10:32:35
Melanie
Hallo VBA- Profis,
ich habe ein Tabelle mit Daten, die ich Zeilenweise durchlaufe und formatiere, ua. möchte ich eine String an der 2. Stelle abschneiden:
Dim i as Integer
for i=1 to 300
ActiveSheet.Cells(i, 11).Value = Mid(Active.Cells(i, 4), 0, 2)
next i
Ich bekomme aber einen debug-Fehler.
Was mache ich falsch?
viele Grüße
Melanie

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

Betreff
Datum
Anwender
Anzeige
AW: String an 2.Stelle abschneiden
09.04.2013 10:36:58
Rudi
Hallo,
ActiveSheet.Cells(i, 11).Value = Mid(ActiveSheet.Cells(i, 4), 2)
Gruß
Rudi

AW: String an 2.Stelle abschneiden
09.04.2013 10:38:18
Klaus
Hi,
Active gibt es nicht, es heisst ActiveSheet.
Ein String fängt nicht bei Stelle 0 an, sondern bei Stelle 1.
ActiveSheet.Cells(i, 11).Value = Mid(ActiveSheet.Cells(i, 4), 1, 2)
Grüße,
Klaus M.vdT.

AW: String an 2.Stelle abschneiden
09.04.2013 10:41:04
hary
Moin
Dim i as long
with ActiveSheet
for i=1 to 300
.Cells(i, 11).Value = Left(.Cells(i, 4), 2)
next i
end with
gruss hary

AW: String an 2.Stelle abschneiden
09.04.2013 10:43:34
Melanie
Oh man, doofer Fehler....
Danke an Alle!!!
Viele Grüße
Melanie
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige