Guten Tag
Ich trage mit einem Marko in der Spalte Range("Bezeichnung").Column (=D)
Bezeichungen ein, wenn auf der gleichen Zeile in Spalte A
ein numerischer Eintrag enthalten ist.
Manchmal ist dort auch ein längerer Text enthalten, der über die Spalte D hinausreicht.
Komischerweise bewirkt nun der Eintrag von nichts (.Cells(zNr, Range("Bezeichnung").Column) = ""), dass dieser Text der Spalte A ab Spalte D nicht mehr ersichtlich ist.
Was muss man vorkehren, dass Texte über die Spalte C hinaus nicht abgeschnitten werden?
Danke für jeden Hinweis.
Gruss, Peter
If IsNumeric(.Cells(zNr, Range("Valor").Column)) Then '
.Cells(zNr, Range("Bezeichnung").Column) = Evaluate("=IF(ISNUMBER(" & spBuchstabe(Range("Valor").Column) & zNr & "),IF(ISERROR(VLOOKUP(" & spBuchstabe(Range("ValWae").Column) & zNr & ",eDaten,COLUMN(tkBezeichnung),FALSE)),""Löschen"",VLOOKUP(" & spBuchstabe(Range("ValWae").Column) & zNr & ",eDaten,COLUMN(tkBezeichnung),FALSE)),"""")")
Else
.Cells(zNr, Range("Bezeichnung").Column) = ""
End If