Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
il testo viene generato da file pdf
il testo va a capo anche se la cella è larga
ho trovato questo codice
- Sub RimuoviRitorniACapo()
- Dim Intervallo As Range
- Application.ScreenUpdating = False
- Application.Calculation = xlCalculationManual
- For Each Intervallo In ActiveSheet.UsedRange
- If 0 < InStr(Intervallo, Chr(10)) Then
- Intervallo = Replace(Intervallo, Chr(10), "")
- End If
- Next
- Application.ScreenUpdating = True
- Application.Calculation = xlCalculationAutomatic
- End Sub
funziona, l'unico problema che non viene inserito lo spazio cioe diventa
| il testo incollatoviene effettuatocon <br>gli andare a capo |
|---|
come nell'esempio sopra