Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

MsgBox pour @Christophe@ plus spécialement

M

Mélissa

Guest
Bonjour,

Désolé de relancer ce sujet mais voisci en fait la formule dans laquelle je souhaiterais insérer mon N et ça ne marche pas.

Merci pour votre aide


N = Application.InputBox(prompt:="Entrez la valeur de N", Type:=1)

Range("A1").FormulaR1C1 = _

"=INDIRECT(""'C:\WINNT\Profiles\Melissa\Bureau\Excel\[BIBLIOTHEQUE""&year(R[
-5]C)&"".xls]Feuil1'!$C$"&N&")
 
P

Pascal76

Guest
Salut Melissa

Juste un petit commentaire lorsque tu inséres des variables il faut un espace avant et après le signe & sinon ça marche pas

Et je crois bien qu'Excel ne t'indiques rien et ne mets pas l'espace tout seul

Bon courage

Pascal
 
W

wally

Guest
Bonjour Mélissa et le forum,

Essaye ceci (en remplaçant B1 par la cellule dans laquelle se trouve la date dont on extrait l'année) :

N = Application.InputBox(prompt:="Entrez la valeur de N", Type:=1)

Range("A1").Formula = "=INDIRECT('C:\WINNT\Profiles\epass3\Bureau\Melissa\[BIBLIOTHEQUE" & Year(Range("B1")) & ".xls]Feuil1'!$C$" & N & ")"


Slts

wally
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…