Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.

Riempimento automatico celle



  • Riempimento automatico celle
    di dario.debe data: 26/09/2017 15:53:27

    Ciao a tutti,
    avrei necessità di ottenere con macro un riempimento automatico delle righe come da file allegato
    Come potrei procedere?
    Grazie in anticipo per ogni risposta



  • di Mister_x (utente non iscritto) data: 26/09/2017 17:01:35

    ciao

    e' possibile avere un file excel al posto di una immagine??

    ciao





  • di Mister_x (utente non iscritto) data: 26/09/2017 17:10:46

    riciao

    trovato il file excel

    la sub inserita nel relativo foglio e' questa

    risposto il tuo file con inserita tale sub()

    ciao
     
    Sub inserisci()
Dim i As Long
For i = 2 To Cells(Rows.Count, "D").End(xlUp).Row - 1
  If Cells(i + 1, "A") = "" Then
    Cells(i + 1, "A") = Cells(i, "A")
    Cells(i + 1, "B") = Cells(i, "B")
    Cells(i + 1, "C") = Cells(i, "C")
  End If
Next i
End Sub



 


by Globosoft © 2018 Regole di utilizzo | Contatti | Privacy Policy