Azione sostituisci da vba

Hai un problema con Excel?

Nuova discussione

Azione sostituisci da vba
di Giamm (utente non iscritto) data: 05/04/2010
Salve ragazzi avrei un piccolo problema nel fare ciò in excel. vi spiego:
ho una colonna di questo genere con valori data&ora
colonna_a
28/04/2010 17:00
28/04/2010 21:00
15:00
20:30
12/04/2010 18:00
come vedete in alcune righe manca la data, è presente soltato l'orario.
bhe io avrei bisogno con una macro in vba, che nelle righe dove non è presente la data, mi metta la data del giorno...
quindi verrebbe in questo modo
28/04/2010 17:00
28/04/2010 21:00
05/04/2010 15:00
05/04/2010 20:30
12/04/2010 18:00
potreste aiutarmi, io attualmente la cosa l'aggiro eseguendo ogni volta manualmente sostituisci 00/01/1900 (ke è la data ke mi imposta excel dove non trova la data quando imposto il formato data&ora) con la data odierna.

vi ringrazio anticipatamente per l'attenzione che presterete al mio caso.

grazie...un saluto
di Ricky53 (utente non iscritto) data: 06/04/2010
Ciao,
il formato che hai nella cella è gg-mm-aaaa hh.mm
ma la cella (dove vedi "15.00") contiene un numero ed esattamente 0,625 che corrisponde a 15 ore su 24 ore.

la cosa è fattibile con una macro.
tu come te la cavi con il vba?

però prima vorrei controllare i tuoi dati.
puoi inviare un file di esempio.
attenzione ai dati riservati.

ciao da ricky53
di Giamm (utente non iscritto) data: 06/04/2010
Innanzi tutto grazie per la risposta, ho allegato un file di esempio.

per quanto riguarda vba non sono un esperto, ci smanetto un pò, creo qualche macro con il registratore di macro, gli appongo qualche modifica, ma non di più.

grazie per l'interessamento.
di Ricky53 (utente non iscritto) data: 06/04/2010
Ciao,
prova in questo modo:

in "b3" scrivi

=a3+se(a3<1; oggi(); 0)

poi copia in basso sulle altre celle.

ciao da ricky53

di Giamm (utente non iscritto) data: 06/04/2010
Grazie riky, in realtà è proprio quello che cercavo, solo un pikkolo problema, ma forse non mi ero spiegato bene io.
la formula è ottima, il problema è ke io cerco un modo per ritrovarmi i dati già nella colonna a.
il tutto tramite una macro senza dover andare a scrivere nelle celle..

io c'ho provato col codice che ho postato ma non mi funziona, non so perkè
riusciresti a consigliarmi un modo per fare ciò.
molte grazie cmq.

Columns("A:A").Select
    Selection.Replace What:="01/00/1900", Replacement:="06/04/1900", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

Non capisco
di Miki4 (utente non iscritto) data: 06/04/2010
Mi stanno arrivando delle email da parte di giamm (che guarda caso sono le iniziali del mio cognome ) io non sono iscritto a tale forum (anche se mi sembra interessante) e non ho quindi rilasciato alcuna email come mai mi arrivano ..... fammi sapere giamm scrivi nuovamente sulla email che hai inviato forse per errore e fammi capire ti ringrazio e ossequi

di Ricky53 data: 07/04/2010
Ciao giamm,
ti avevo proposto la soluzione con le formule perchè avevi scritto che con il vba ...

adesso prova con questa macro.

ciao da ricky53

Sub Aggiorna_dati()
    RR = Range("A" & Rows.Count).End(xlUp).Row
    For I = 1 To RR
        If Cells(I, 1) < 1 Then
            Cells(I, 1) = Cells(I, 1) + Date
        End If
    Next I
End Sub

di Giamm (utente non iscritto) data: 12/04/2010
Proprio quello ke cerkavo...
grazie rickyyy

Vuoi Approfondire?