Vai indietro   Scuola forum (scuo.la) - Forum di discussione per le scuole > Materie di Scuola > Informatica



Top 5 Stats
Latest Posts
Discussione    data, Ora  invio  Risposte  Visite   Forum
Vecchio Dove trovare un vaso con scarico dritto per eliminare tubo a S?  26-02, 16:16  karol  1  23831   Idraulica
Vecchio Le valvole antireflusso evitano reflusso proveniente dal WC?  26-02, 09:16  Marsilio  1  18632   Idraulica
Vecchio Il welfare puo contribuire all'evoluzione del liberalismo?  25-02, 20:00  insu  1  21404   Economia
Vecchio Cosa indica la variazione di energia libera in un processo?  25-02, 19:02  Abramo  1  15691   Chimica
Vecchio La richiesta del recupero retroattivo ore perse è normata?  24-02, 19:01  Luigia  1  201   Scuola in generale
Vecchio In cosa consiste la costante di velocità di reazione chimica?  24-02, 12:13  manuel  1  15274   Chimica
Vecchio Quali passaggi fare per risolvere il caso "Datafile Spa"?  24-02, 09:05  Adam  1  21658   Economia
Vecchio Cos'è quel "Santa" nella canzone "I ga el suv" di DJ Ice?  22-02, 16:32  roberto  1  13300   Film, Libri, Musica
Vecchio Quali malattie portano a temperatura alta e frequenza cardiaca bassa?  18-02, 18:25  Edith  1  11530   Medicina
Vecchio Come dimensionare pompe impianto a portata variabile a tre gradini?  18-02, 08:46  karol  1  9383   Idraulica

Rispondi
 
LinkBack Strumenti della discussione Modalità di visualizzazione
  #1 (permalink)  
Vecchio 02-15-2011, 04:14 PM
Senior Member
 
Registrato dal: Jun 2007
Messaggi: 814
predefinito Quale macro Excel che salvi contenuto celle in file di testo?

Quale macro Excel che salvi contenuto celle in file di testo?


Ho bisogno di creare una macro in Excel che, selezionando un certo numero di celle in una colonna, mi salvi il contenuto delle stesse in un semplice file txt (sovrascrivendo il file txt se ve ne fosseun altro esistente e non richiedendo alcun altro intervento dell’utente se non di lanciare la macro) ma con codifica UTF-8, di modo che compaiano anche correttamente le lettere di lingua straniera quali cinese, cirillico ecc., che altrimenti verrebbero sostituite dal punto di domanda.
Grazie
Marco
Rispondi quotando
  #2 (permalink)  
Vecchio 02-02-2024, 07:12 PM
Member
 
Registrato dal: Oct 2007
Messaggi: 41
predefinito

Ciao,
Per creare una macro in Excel che salvi il contenuto delle celle selezionate in una colonna in un file di testo con codifica UTF-8, puoi seguire i passaggi seguenti:

Apri Excel e vai alla scheda "Developer". Se non vedi la scheda "Developer" nella barra del menu, abilita questa scheda andando su "File" -> "Opzioni" -> "Personalizza barra multifunzione" e attiva la casella "Sviluppo".

Nella scheda "Developer", clicca su "Visualizza codice" per aprire l'Editor VBA.

Nel Editor VBA, inserisci il seguente codice:

----------------

Sub SalvaComeUTF8()
Dim selectedRange As Range
Dim filePath As String

' Verifica se è stata selezionata una colonna
If Selection.Columns.Count <> 1 Then
MsgBox "Seleziona una singola colonna di celle", vbExclamation
Exit Sub
End If

' Ottieni il percorso del file
filePath = Application.GetSaveAsFilename(FileFilter:="File di testo (*.txt), *.txt", Title:="Salva come")

' Esci se l'utente ha annullato il salvataggio
If filePath = "Falso" Then Exit Sub

' Ottieni la gamma selezionata
Set selectedRange = Selection

' Salva il contenuto nel file UTF-8
SaveAsUTF8 filePath, selectedRange.Value

MsgBox "Contenuto salvato correttamente in " & filePath, vbInformation
End Sub

Sub SaveAsUTF8(filePath As String, content As String)
Dim utf8Stream As Object
Set utf8Stream = CreateObject("ADODB.Stream")

' Configura il flusso come testo Unicode
utf8Stream.Charset = "UTF-8"
utf8Stream.Open
utf8Stream.WriteText content

' Salva il flusso nel file
utf8Stream.SaveToFile filePath, 2 ' 2 corrisponde a adSaveCreateOverWrite

' Chiudi il flusso
utf8Stream.Close
Set utf8Stream = Nothing
End Sub

----------------

Chiudi l'Editor VBA.

Torna in Excel e seleziona la colonna di celle che desideri salvare nel file di testo UTF-8.

Vai alla scheda "Developer" e clicca su "Macros". Troverai la macro "SalvaComeUTF8" nella lista delle macro disponibili. Seleziona e fai clic su "Esegui".

Verrà visualizzata una finestra di dialogo per selezionare il percorso e il nome del file di testo. Dopo aver fatto la selezione, clicca su "Salva".

Questo salverà il contenuto delle celle selezionate in un file di testo con codifica UTF-8.




Rispondi quotando
Rispondi

Strumenti della discussione
Modalità di visualizzazione

Regole d'invio
Non puoi inserire discussioni
Non puoi inserire repliche
Non puoi inserire allegati
Non puoi modificare i tuoi messaggi

BB code è attivo
Le smilie sono attive
Il codice IMG è attivo
il codice HTML è disattivato
Trackbacks are attivo
Pingbacks are attivo
Refbacks are attivo


Discussioni simili
Discussione Ha iniziato questa discussione Forum Risposte Ultimo messaggio
Concetto di tensione superficiale e la relazione di Kelvin federiconitidi Chimica 1 01-22-2024 07:32 PM
Come spiegare concetti su tensione di vapore ed ebollizione? MioDiMia Chimica 1 10-23-2023 09:24 AM
Come determinare formula molecolare composto organico gassoso? lulyfaty Chimica 1 09-18-2023 08:48 AM
Se per farti tacere si inventano una malattia che non hai? ROSINABUONISSIMA Medicina 1 05-10-2018 09:33 AM
I risvolti psicologici del non amare di essere contraddetti gio_46 Psicologia 1 12-16-2017 07:21 AM


Tutti gli orari sono GMT +2. Attualmente sono le 03:17 AM.


© Copyright 2008-2022 powered by sitiweb.re - P.IVA 02309010359 - Privacy policy - Cookie policy e impostazioni cookie