2
nach x zeichen in die nächste spalte springen
hallo allerseits
nach dem google mir nix liefern konnte dachte ich frag mal hier.
folgendes problem
es wird von einem benutzer aus einer dropdown liste verschieden einträge ausgewählt, die dann in eine zelle geschrieben werden.
nun soll aber nach 8 zeichen in die nächste spalte weiter geschrieben werden bzw in die zelle rechts daneben.
hier ein paar bilder um zu verdeutlichen was ich meine
größere ansicht:
http://img407.imageshack.us/my.php?image=unbenanntmq9.jpg
und hier der code für in die angrenzende zelle zu schreiben:
vielen dank schon mal im voraus
nach dem google mir nix liefern konnte dachte ich frag mal hier.
folgendes problem
es wird von einem benutzer aus einer dropdown liste verschieden einträge ausgewählt, die dann in eine zelle geschrieben werden.
nun soll aber nach 8 zeichen in die nächste spalte weiter geschrieben werden bzw in die zelle rechts daneben.
hier ein paar bilder um zu verdeutlichen was ich meine
größere ansicht:
http://img407.imageshack.us/my.php?image=unbenanntmq9.jpg
und hier der code für in die angrenzende zelle zu schreiben:
Private Sub CommandButton1_Click()
Dim cell As Integer
Cells(ActiveCell.Row, ActiveCell.Column + 1).Value = ComboBox1.Value
End
End Subvielen dank schon mal im voraus
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 102206
Url: https://administrator.de/contentid/102206
Ausgedruckt am: 25.11.2024 um 20:11 Uhr
2 Kommentare
Neuester Kommentar
Hallo herbiemaster!
Du musst ja nur "ComboBox1.Value" zerlegen
und kannst die Teile dann einzeln schreiben.
Grüße
bastla
Du musst ja nur "ComboBox1.Value" zerlegen
Nr = Left(ComboBox1.Value, 8)
Text = Mid(ComboBox1.Value, 9)Grüße
bastla
saaaauubbberr
besten dank!
genau danach habe ich gesucht
besten dank!
genau danach habe ich gesucht
