[Excel] Riempimento automatico formulario

[ciro78]

prova a usare questo codice

Public Sub Copia_Dati()
i = 2
Do
  valorecella = Cells(i, 1).Value
  x = 2
  Do
    If Sheets("Foglio1").Cells(x, 1).Value = valorecella Then
      campo1 = Sheets("Foglio1").Cells(x, 2).Value
      campo2 = Sheets("Foglio1").Cells(x, 3).Value
      ActiveWorkbook.Worksheets("Foglio2").Activate
      Cells(i, 2) = campo1
      Cells(i, 3) = campo2
      Exit Do
     Else
       x = x + 1
     End If
     Loop Until Sheets("Foglio1").Cells(x, 1).Value = ""
  i = i + 1
Loop Until Cells(i, 1).Value = ""
End Sub 

in questo caso inserisci quante righe vuoi senza modificare il codice ma a differenza di prima si interrompe se trova nella prima colonna trova una riga nuova

esempio

se cambi la riga 4 e la 3 è bianca la riga 4 non viene modificata
ovviamente le modifiche vengono apportate solo se cambi la selezione di una cella
all'interno della prima colonna cioè quella con etichetta numero riga

[Kanjikill]

Secondo me è meglio che tu faccia tutto in php.

[ciro78]

PHP??? ma se gli serve in excel!