ich kriege folgendes nicht hin:
Ich möchte aus einem Tabellenblatt (tblgesamtdaten) eine Reihe von ca. 27 Zellen in Abhängigkeit einer Zeilennummer (Eingabe über Userform) per Schleife (Zelle auf vorhandenen Inhalt prüfen) auslesen und diese Werte in ein anderes Tabellenblatt (tblPreisschild) in eine zusammengefasste Zelle (M26:T38) mit Leerzeichen oder durch Komma getrennt eintragen.
Mein bisheriger Code:
Rem Auststattung eingeben
Range("M26:T37").Select
For i = 28 To 55
With Sheets("tblgesamtdaten")
Do While Cells(zeile, i).Value " "
End With
ActiveCell.Formula = Cells(zeile, i).Value
Loop
Next i
funktioniert nicht, daher hier die Bitte um Hilfe.