R
Rick
Guest
J'ai un code qui comprends une centaine de lignes semblables a celle qui suit.
Sheets("Feuil1").Range("B18").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C8"
Sheets("Feuil1").Range("B19").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C10"
Sheets("Feuil1").Range("B20").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C12"
Sheets("Feuil1").Range("B21").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C14"
.................
Sheets("Feuil1").Range("B100").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C172"
Yas-t-il une boucle simple qui me permettrait de faire la meme chose sans écrire 100 lignes?
Merci
Sheets("Feuil1").Range("B18").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C8"
Sheets("Feuil1").Range("B19").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C10"
Sheets("Feuil1").Range("B20").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C12"
Sheets("Feuil1").Range("B21").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C14"
.................
Sheets("Feuil1").Range("B100").Value = "='c:\excel.xls[excel.xls]Feuil1'!" & "C172"
Yas-t-il une boucle simple qui me permettrait de faire la meme chose sans écrire 100 lignes?
Merci