Bonjour a tous
Je travaille actuellement sur un fichier avec plusieurs onglets. Malheureusement je n'arrive pas à récupérer la valeur d'un onglet pour la mettre sur un aute.. voici un bout de code
le probleme vient de Sheets("INV HSC"), il me met suscript out of range
quelqu'un aurait-il une suggestion ?
merci d'avance
Je travaille actuellement sur un fichier avec plusieurs onglets. Malheureusement je n'arrive pas à récupérer la valeur d'un onglet pour la mettre sur un aute.. voici un bout de code
Code:
Dim i As Integer
Dim vide As Boolean
i = 2
vide = False
Do While vide = False
If IsEmpty(Sheets("Extract").Cells(i, 1)) Then 'si fin du tableau
vide = True
Else
If Sheets("Extract").Cells(i, 1) = 95724602 Then
Sheets("INV HSC").Cells(7, 9) = Sheets("Extract").Cells(i, 2)
End If
i = i + 1
End If
Loop
le probleme vient de Sheets("INV HSC"), il me met suscript out of range
quelqu'un aurait-il une suggestion ?
merci d'avance