Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel erreur dans macro

erreur dans macro

2 réponses
Avatar
Ptck
Bonsoir
je demande le nom de la feuille où sont les données mais je n'arrive pas à
l'inclure dans la formule
que j'ai fait l'enregisteur de macro j'ai fc et non le nom de la feuille

merci de votre aide
ptck

Sub Macro1()
fc = Application.InputBox("fichier :", "Saisie", , , , , , 2)
ActiveWorkbook.Names.Add Name:="tab", RefersToR1C1:= _
"=OFFSET(Fc!R1C1,,,COUNTA(Fc!C1),COUNTA(Fc!R1))"
End Sub
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
isabelle
bonjour Ptck,

Sub Macro1()
Fc = Application.InputBox("fichier :", "Saisie", , , , , , 2)
ActiveWorkbook.Names.Add Name:="tab", RefersToR1C1:= _
"=OFFSET(" & Fc & "!R1C1,,,COUNTA(" & Fc & "!C1),COUNTA(" & Fc &
"!R1))"
End Sub

isabelle

Ptck a écrit :
Bonsoir
je demande le nom de la feuille où sont les données mais je n'arrive pas à
l'inclure dans la formule
que j'ai fait l'enregisteur de macro j'ai fc et non le nom de la feuille

merci de votre aide
ptck

Sub Macro1()
fc = Application.InputBox("fichier :", "Saisie", , , , , , 2)
ActiveWorkbook.Names.Add Name:="tab", RefersToR1C1:= _
"=OFFSET(Fc!R1C1,,,COUNTA(Fc!C1),COUNTA(Fc!R1))"
End Sub






Avatar
ptck
Merci Isabelle
"isabelle" a écrit dans le message de news:
%
bonjour Ptck,

Sub Macro1()
Fc = Application.InputBox("fichier :", "Saisie", , , , , , 2)
ActiveWorkbook.Names.Add Name:="tab", RefersToR1C1:= _
"=OFFSET(" & Fc & "!R1C1,,,COUNTA(" & Fc & "!C1),COUNTA(" & Fc &
"!R1))"
End Sub

isabelle

Ptck a écrit :
Bonsoir
je demande le nom de la feuille où sont les données mais je n'arrive pas
à
l'inclure dans la formule
que j'ai fait l'enregisteur de macro j'ai fc et non le nom de la feuille

merci de votre aide
ptck

Sub Macro1()
fc = Application.InputBox("fichier :", "Saisie", , , , , , 2)
ActiveWorkbook.Names.Add Name:="tab", RefersToR1C1:= _
"=OFFSET(Fc!R1C1,,,COUNTA(Fc!C1),COUNTA(Fc!R1))"
End Sub