kann mir jemand helfen??
Ich versuche z.B. die Spalten A+B mit deren Inhalte zu einer Spalte zusammenzufügen.
Danke,
Akim123
in Spalte C folgende Formel:
= A1 & " " & B1
Dann 'runterziehen.
Gruß
Mike
danke
Sub Akim()
Dim i as Integer
For i = 1 to Cells.SpecialCells(xlLastCell).Row
Sheets(1).Cells(i,3) = Sheets(1).Cells(i,1) & " " & Sheets(1).Cells(i,2)
Next i
End Sub
Gruß
Mike
Ungültige Konvertierung von Typ 'Range' in Typ 'String'.
Warum???
Vielen DAnk
kann ich mir nicht erklären; aber versuche einmal anstelle von
"Sheets(1)"
"Worksheets("DerNameDeinesBlattes")"
zu schreiben.
Hast Du das kaufmännische "&" verwendet oder nimmst du das "+"-Zeichen?
Viele Grüße
Mike
For i = 1 To objExOut.Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell).Row
objExOut.Sheets(1).Cells(i, 18) = objExOut.Sheets(1).Cells(i, 1) & " " & objExOut.Sheets(1).Cells(i, 2)
Next i
da muss ich passen.
Gruß
Mike