In questo articolo, impareremo come modificare la formula nelle celle in un intervallo in valori utilizzando VBA in Microsoft Excel.
I dati grezzi per questo esempio sono costituiti da dati di vendita. I dati sulle vendite contengono informazioni sul numero di articoli venduti dai dipendenti in diverse città. L'ultima riga e colonna contiene la formula della somma per trovare il numero totale di articoli venduti in una determinata città da un determinato dipendente.
Vorremmo convertire tutte le formule nel foglio attivo in valori. Per convertire tutte le formule in valori, abbiamo creato una macro “ChangingFormulasToValue”. Questa macro può essere eseguita facendo clic sul pulsante "Converti formule in valori".
Nell'istantanea, si può vedere la formula nella cella H18 convertita in valore.
Spiegazione del codice
Imposta SourceRng = Range("A1", Range("A1").SpecialCells(xlCellTypeLastCell))
Il codice sopra viene utilizzato per assegnare tutte le celle a partire dalla cella A1 all'ultima cella della cartella di lavoro come intervallo.
SourceRng.Value = SourceRng.Value
Il codice sopra viene utilizzato per assegnare il valore della cella saltando la formula
Si prega di seguire sotto per il codice
Option Explicit Sub ChangingFormulasToValue() 'Dichiarazione variabili Dim SourceRng As Range 'Specifica tutte le celle del foglio attivo come intervallo Set SourceRng = Range("A1", Range("A1").SpecialCells(xlCellTypeLastCell)) 'Assegna solo il valore del formula per saltare la cella della cella SourceRng.Value = SourceRng.Value End Sub
Se ti è piaciuto questo blog, condividilo con i tuoi amici su Facebook. Inoltre, puoi seguirci su Twitter e Facebook.
Ci piacerebbe avere tue notizie, facci sapere come possiamo migliorare il nostro lavoro e renderlo migliore per te. Scrivici al sito di posta elettronica
