Les valeurs sont :
nomfeuille = "500400 17.02" (la feuille existe)
position = 5
numop = 25
MaFormule = "=SERI.JOUR.OUVRE($R$2;-($Z$5/8))"
(Les valeurs des variables sont celles données en deboggant)
A l'execution, ca me renvoie erreur 1004
Pourriez vous m'aider ?
Merci pour vos reponses
--
JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:\Program Files\Microsoft Office\Office\1036\VBALIST.XLS
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JLuc
Petite précision qui peut aider (peut etre), les cellules Y6 et Z6 sont fusionnées. Je ne pense pas que cela joue dans la ballance, mais sait on jamais... :')
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/ C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
Petite précision qui peut aider (peut etre), les cellules Y6 et Z6 sont
fusionnées. Je ne pense pas que cela joue dans la ballance, mais sait
on jamais... :')
--
JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
Petite précision qui peut aider (peut etre), les cellules Y6 et Z6 sont fusionnées. Je ne pense pas que cela joue dans la ballance, mais sait on jamais... :')
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/ C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
AV
Sub zz() Position = 5 numop = 25 nomfeuille = "500400 17.02" MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))" Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule End Sub
AV
Sub zz()
Position = 5
numop = 25
nomfeuille = "500400 17.02"
MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))"
Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule
End Sub
Sub zz() Position = 5 numop = 25 nomfeuille = "500400 17.02" MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))" Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule End Sub
AV
JLuc
*Bonjour AV*, Merci, c'etait exactement ca ;-)
Sub zz() Position = 5 numop = 25 nomfeuille = "500400 17.02" MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))" Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule End Sub
AV
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/ C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
*Bonjour AV*,
Merci, c'etait exactement ca ;-)
Sub zz()
Position = 5
numop = 25
nomfeuille = "500400 17.02"
MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))"
Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule
End Sub
AV
--
JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
Sub zz() Position = 5 numop = 25 nomfeuille = "500400 17.02" MaFormule = "=SERIE.JOUR.OUVRE($R$2;-($Z$5/8))" Sheets(nomfeuille).Cells(Position + 1, numop).FormulaLocal = MaFormule End Sub
AV
-- JLuc
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et astuces ! http://www.excelabo.net http://jacxl.free.fr/ http://dj.joss.free.fr/ C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS
