Condividi:        

numeri testo in valute

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

numeri testo in valute

Postdi raimea » 14/04/18 20:56

ciao
in un foglio1 ho dei valori che scrivo tramite copia- incolla

in col G ho gli importi scritti in formato generale
quindi non posso usarli x fare operazioni matematiche somme , sotraz ecc

vorrei tramite macro , trasformare gli importi
di col G in valuta e scritti con la virgola

in modo da poter fare delle operazioni

vi allego il file
https://www.dropbox.com/s/0bg61zdtg0talbt/valuta.rar?dl=0

grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1408
Iscritto il: 11/02/10 07:33
Località: lago

Sponsor
 

Re: numeri testo in valute

Postdi Marius44 » 14/04/18 23:23

Ciao
prova con questa (nel caso volessi moltiplicare G7 x H7)
=(SOSTITUISCI(SOSTITUISCI(G7;"€";"");".";","))*H7

Ciao,
Mario
Marius44
Utente Senior
 
Post: 655
Iscritto il: 07/09/15 22:00

Re: numeri testo in valute

Postdi raimea » 15/04/18 06:51

ciao
si, questa formula funziona.
ho usato una colonna d' appoggio e l ho adattata cosi:

Codice: Seleziona tutto
=(SOSTITUISCI(SOSTITUISCI(G7;"€";"");".";","))*1


pero' se possibile vorrei avere il risultato
con una macro e nella stessa colonna G

comunque, grazie Mario

ciao
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1408
Iscritto il: 11/02/10 07:33
Località: lago

Re: numeri testo in valute

Postdi Marius44 » 15/04/18 06:58

Ciao
Se, come credo, hai una buona conoscenza di VBA, prova con la funzione SPLIT

Al caso richiama ...
Ciao,
Mario
Marius44
Utente Senior
 
Post: 655
Iscritto il: 07/09/15 22:00

Re: numeri testo in valute

Postdi Anthony47 » 15/04/18 23:21

Usando Trova e sostituisci con macro autoregistrata:
Codice: Seleziona tutto
Sub ReValue()
'
Columns("G:G").Replace What:="€", Replacement:="", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False
Columns("G:G").Replace What:=".", Replacement:=",", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False
Range("F5").Copy
Columns("G:G").PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _
    :=False, Transpose:=True
Application.CutCopyMode = False
Range("G1").Select
End Sub

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: numeri testo in valute

Postdi raimea » 16/04/18 06:12

ciao
tutto ok

trasforma gli importi da formato testo in numeri valuta.

grazie
S.O. win10, Excell 2019
Avatar utente
raimea
Utente Senior
 
Post: 1408
Iscritto il: 11/02/10 07:33
Località: lago


Torna a Applicazioni Office Windows


Topic correlati a "numeri testo in valute":


Chi c’è in linea

Visitano il forum: Nessuno e 27 ospiti