Hallo
die Null hat mich auch genarrt, vor allem weil sie NICHT sichtbar ist. Dahinter kam ich mit einer Test MsgBox warum das so ist.
Es handelt sich um eine Hexzahl, die Hex 0, ein ASCII Steuerzeichen! Die werden nicht geprintet, sind aber sehr wirksam.
Den Kollegen im Forum bekannt als vblf, LineFeed und Cr, Carrige Return, um nur 2 zu nennen. Oder EOF = EndOfLine.
Mit dem unteren Code, vorhin getestet, kann man sie löschen ohne Zahlen oder Texte zu löschen. Bitte selbst testen.
mfg Gast 123
Nachtrag diese Steuerzeichen wurden als Standard entwickelt um Texte und Nachrichten versenden zu können.
List man z.B. Word Dateien mit einem Hex Editor aus, sieht man diese Steuerzeichen im Text als Zeilenumbruch etc.
EOF findet man auch in Codes um Dateien mit DOS Programmen von Festplatten auszulesen. End of File.
die Null hat mich auch genarrt, vor allem weil sie NICHT sichtbar ist. Dahinter kam ich mit einer Test MsgBox warum das so ist.
Es handelt sich um eine Hexzahl, die Hex 0, ein ASCII Steuerzeichen! Die werden nicht geprintet, sind aber sehr wirksam.
Den Kollegen im Forum bekannt als vblf, LineFeed und Cr, Carrige Return, um nur 2 zu nennen. Oder EOF = EndOfLine.
Mit dem unteren Code, vorhin getestet, kann man sie löschen ohne Zahlen oder Texte zu löschen. Bitte selbst testen.
mfg Gast 123
Code:
Sub Hex_Nullen_löschen()
Dim AC As Range, lz1 As Long
lz1 = Cells(Rows.Count, 1).End(xlUp).Row
For Each AC In Range("A1:A" & lz1)
If Asc(AC) = 0 Then
AC.Value = Empty
End If
Next AC
End Sub
Sub test()
'Test auf ASCII Steuerzeichen!!
MsgBox Asc(Left(ActiveCell, 1))
End Sub
Nachtrag diese Steuerzeichen wurden als Standard entwickelt um Texte und Nachrichten versenden zu können.
List man z.B. Word Dateien mit einem Hex Editor aus, sieht man diese Steuerzeichen im Text als Zeilenumbruch etc.
EOF findet man auch in Codes um Dateien mit DOS Programmen von Festplatten auszulesen. End of File.