ciao anthony47, speravo in un tuo intervento risolutore e ti ringrazio dell'interessamento al problema
confermo che il codice postato l'avevo preso dal forum da un post di ramset64 e che l'ho successivamente modificato con le tue risposte in
NomeTxt = Replace(ActiveWorkbook.Name, ".xlsm", ".html")
ActiveWorkbook.SaveAs Filename:=NomeTxt, _
FileFormat:=xlUnicodeText, CreateBackup:=False
allora, come anticipato nei post precedenti, io ho bisogno di un copia/incolla un po particolare, che se fatto manualmente non genera errori, ma se fatto col salvataggio dei file .xlsx sul notepad, genera errori, nel senso che il contenuto della cella a1 <table><tr><td>"il mio testo"</td></tr></table> diventa "<table><tr><td>""il mio testo""</td></tr></table>". In pratica vengono aggiunte delle virgolette doppie prima di < all'inizio e dopo > alla fine ed all'interno dove ci sono le virgolette ne aggiunge altre; e questa sporcatura dei dati in output mi genera errore sul server perchè l'html è formattato male.
A me servirebbe che excel compia questa operazione [cosa che faccio in manuale e che mi genera codice xhtml valido]
1) seleziona i dati nelle celle A1:a5
2) copia i dati selezionati
3) apri notepad [oppure un file di notepad presente su c:\...]
4) incolla i dati selezionati sul notepad
5) salva il notepad e chiudilo
spero di avere esposto il problema in maniera chiara, e credo che per arrivare alla soluzione si debba passare attraverso l'utilizzo dell'oggetto Application, per creare una nuova istanza di notepad su cui incollare i dati.
anthony47 grazie per il tempo dedicatomi, sono nelle tue mani, anzi nel tuo codice, sempre pulito ed essenziale
Registrazione
