For i = 0 To 10000 Selection.EndKey Unit:=wdLine Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend If Selection.Characters(1) = Chr(13) Then Selection.Delete ' Selection.TypeText Text:=" " Else Selection.MoveRight Unit:=wdCharacter, Count:=1 End If Next i
Pero ¿no hay algo sencillito, como Buscar Chr(13) y reemplazar por " ", por ejemplo en Word Pad? Con cámara o sin ella yo siempre estoy tomando fotos. EOS1DsMII, EF50L 1.2, EF24-105L, MP-E65macro, EF100macro, Peleng8mm... y un montón de cacharros mas....
El administrador ha desactivado el acceso público de escritura.
