Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

eliminare carattere $

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

eliminare carattere $

Postdi miko » 19/02/10 13:45

ciao,
sono riuscito a scrivere una macro che elenca, in una colonna, gli indirizzi delle eventuali celle vuote presenti in un range:
Codice: Seleziona tutto
Sub ELENCA_VUOTE()
 C = 13
   For Each cel In Range("B3:K22")
      If cel.Value = "" Then
    R = R + 1
  Cells(R + 2, C).Value = cel.Address(RowAbsolute:=False)
    End If
     Next cel
     End Sub

gli indirizzi sono scritti nella forma:
$b3
$e5
$k15
è possibile, e come, ottenere gli indirizzi senza il carattere $, cioè nella forma:
b3
e5
k15
oppure bisogna creare una altra macro del tipo elimina caratteri stringa?
grazie ciao
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Sponsor
 

Re: eliminare carattere $

Postdi Anthony47 » 19/02/10 14:38

Guarda l' help on line del vba, alla voce "address", cosi' scoprirai che esiste, oltre all' opzione RowAbsolute, anche la ColumnAbsolute, che metterai analogamente su False.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: eliminare carattere $

Postdi miko » 19/02/10 19:34

buona sera
grazie anthony, ho cercato come mi hai suggerito ed ho risolto.
vorrei migliorare la macro ed inserire una msgbox;
se nel range ci sono celle vuote avrò l'elenco in una colonna, ma se non ci sono celle vuote vorrei visualizzare un messaggio del tipo "non ci sono celle vuote nel range"
o qualcosa di simile.
ho provato ad inserire il msg ma non ho ottenuto risultati soddisfacenti.
come modifico il precedente listato?
saluti grazie
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44

Re: eliminare carattere $

Postdi Flash30005 » 19/02/10 19:45

Codice: Seleziona tutto
Sub ELENCA_VUOTE()
ContaV = 0
C = 13
   For Each cel In Range("B3:K22")
      If cel.Value = "" Then
    R = R + 1
ContaV= ContaV + 1
  Cells(R + 2, C).Value = cel.Address(RowAbsolute:=False)
    End If
     Next cel
If ContaV > 0 then
       Msgbox "Ci sono " & ContaV & " celle vuote"
else
       Msgbox "Non ci sono celle vuote"
endif
     End Sub


Ciao

Ps. codice scritto direttamente nel post e non testato ma non dovrebbero esserci problemi
Flash
Win7 + Office 2010 Ita
"Fotografica" al servizio dell'immagine

Ottime opportunità di lavoro (part-time o full-time) con guadagni immediati. Info in MP
Avatar utente
Flash30005
Moderatore
 
Post: 8460
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: eliminare carattere $

Postdi miko » 19/02/10 21:53

ciao,
...infatti non ci sono problemi, funziona benissimo
grazie buonanotte
windows xp-office 2003
miko
Utente Senior
 
Post: 422
Iscritto il: 29/12/09 10:44


Torna a Applicazioni Office Windows


Topic correlati a "eliminare carattere $":


Chi c’è in linea

Visitano il forum: fabrizio2001 e 12 ospiti