Remi_54500
XLDnaute Nouveau
Bonjour,
Voila j'ai commencé une macro mais je suis bloqué.
Ce que je voudrais c'est :
Si ma cellule A72 est vide, alors aller à la cellule N+1
Si ma cellule n'est pas vide, alors excuter la formule "IF(RC[-11]=""ITEM"",""Unit price"",VLOOKUP(RC[-3],[Electrical_codebook_SES.xlsx]Codebook!C1:C6,6,FALSE))"
Savez vous ce que je dois rajouter ?
Je suppose que je dois ajouter du VBA juste en dessous du "10" mais je ne sais pas quoi.
Ma macro :
Merci d'avance pour votre aide.
Voila j'ai commencé une macro mais je suis bloqué.
Ce que je voudrais c'est :
Si ma cellule A72 est vide, alors aller à la cellule N+1
Si ma cellule n'est pas vide, alors excuter la formule "IF(RC[-11]=""ITEM"",""Unit price"",VLOOKUP(RC[-3],[Electrical_codebook_SES.xlsx]Codebook!C1:C6,6,FALSE))"
Savez vous ce que je dois rajouter ?
Je suppose que je dois ajouter du VBA juste en dessous du "10" mais je ne sais pas quoi.
Ma macro :
Sub test()
'
' test Macro
'
i = 0
'
For i = 72 To 12000
Sheets("BOM").Select
'
Cells(i, 1).Select
If ActiveCell = "" Then GoTo 10
'
Cells(i, 12).Select
ActiveCell.FormulaR1C1 = "=IF(RC[-11]=""ITEM"",""Unit price"",VLOOKUP(RC[-3],[Electrical_codebook_SES.xlsx]Codebook!C1:C6,6,FALSE))"
Next i
10
End Sub
Merci d'avance pour votre aide.