Bonsoir le forum,
Voilà, je bloque sur ce problème VBA :
Je souhaiterai que le "10.xlsm" soit une valeur d'une cellule soit :
Code : Sélectionner tout - Visualiser dans une fenêtre à part ActiveCell.FormulaR1C1 = "=MAX([10.xlsm]Comptabilité!C11)+1"
J'ai tout essayé mais rien a faire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part ActiveCell.FormulaR1C1 = "=MAX([sheets("reglages").range("a1")]Comptabilité!C11)+1"
Code complet pour comprendre :
Pouvez vous m'aider?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 orkbooks.Open Filename:=Sheets("réglages").Range("b5") & "Sources\Comptabilité\" & Sheets("réglages").Range("b8") & "\" & Sheets("réglages").Range("b7") & ".xlsm" Sheets("Comptabilité").Select Windows("Logiciel.xlsm").Activate Sheets("Réglages").Select Range("b15").Select ActiveCell.FormulaR1C1 = "=MAX([10.xlsm]Comptabilité!C11)+1" Windows(Sheets("réglages").Range("b7") & ".xlsm").Close
Merci par avance
Partager