probleme lancement macro

Le
Patcas
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de ma
femme
Le probleme est que quand elle lance la macro, celle ci se bloque de suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel
Le #4534311
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de ma
femme
Le probleme est que quand elle lance la macro, celle ci se bloque de suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.



Patcas
Le #4534281
Merci beaucoup
je vais tester ta reponse ce midi
cordialement
Patrice

"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de ma
femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.







Patcas
Le #4534111
rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de ma
femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.







Daniel
Le #4534081
Quelles la version d'Excel qui pose problème ?, peux-tu poster le code en
entier ?, est-il rattaché à un bouton ?
Daniel
"Patcas" news: _Cg3i.62$%
rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes
d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de
ma femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.











Patcas
Le #4533981
Merci de t'interesser à mon cas ( presque desesperé...)

Moi j'ai XL 2002

Au bureau ma femme , je ne sais pas exactement, mais j'ai deja fait des
macros qui passent sans probleme
peut etre une fois avec un tri mais je ne me souviens plus comment j'avais
solutionné le pbm
Dans les codes des operations de tri peut etre est il possible d'eclaicir
les textes....
Ma macro est lancée en cliquant sur un rectangle(forme automatique) auquel
j'ai lié la macro

pour le code pas de pbm le voici
"
Sub Amx()

Sheets("FMG").Select
Range("B45:B80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B85").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B85:B120").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B86"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("B10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Sheets("FMG").Select
Range("C45:C80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B125").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B125:B160").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B126"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("B34").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Sheets("GA").Select
Range("B45:B80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B85").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B85:B120").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B86"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("H10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Sheets("GA").Select
Range("C45:C80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B125").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B125:B160").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B126"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("H34").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Sheets("GG").Select
Range("B45:B80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B85").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B85:B120").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B86"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("N10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Sheets("GG").Select
Range("C45:C80").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B125").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=0
Range("B125:B160").AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Selection.Sort Key1:=Range("B126"), Order1:=xlDescending, Header:=xlYes,
_
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Copy
Sheets("AMX").Select
Range("N34").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse

Dim i As Integer
Application.ScreenUpdating = False
For i = Range("T65").End(xlUp).Row To 1 Step -1
If Cells(i, 20).Value = "effacer" Then Cells(i, 20).ClearContents
Next
Columns("T:T").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

Range("F3").Select
End Sub

j'ai construit tout ça avec l'enregistreur
ce qui me chagrine c'est que ça marche chez moi et pas surle PC de ma femme
qui en a + besoin que moi...

amicalement
Patrice


"Daniel" %
Quelles la version d'Excel qui pose problème ?, peux-tu poster le code en
entier ?, est-il rattaché à un bouton ?
Daniel
"Patcas" news: _Cg3i.62$%
rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes
d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" de news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de
ma femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.















Patcas
Le #4533971
je viens d'avoir le renseignement
elle bosse avec XL 2000
il doit donc y avoir une fonction dans le 2002 absente ds le 2000 en ce qui
concerne le tri
Que peut on faire
Merci d'avance
Patrice


"Daniel" %
Quelles la version d'Excel qui pose problème ?, peux-tu poster le code en
entier ?, est-il rattaché à un bouton ?
Daniel
"Patcas" news: _Cg3i.62$%
rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes
d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" de news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de
ma femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.















JLuc
Le #4533961
*Bonjour Patcas*,
A mon avis, c'est l'option DataOption1:=xlSortNormal qui passe pas sur
2000. Enleve et essaie, puis dis nous

rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de ma
femme
Le probleme est que quand elle lance la macro, celle ci se bloque de suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.







--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O



Patcas
Le #4533911
OK merci du tuyau
je verrai ça lundi maintenant
je vais donné une nouvelle version a ma femme qui testera
bon WE
Patrice

"JLuc"
*Bonjour Patcas*,
A mon avis, c'est l'option DataOption1:=xlSortNormal qui passe pas sur
2000. Enleve et essaie, puis dis nous

rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes
d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" de news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de
ma femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.







--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O







Patcas
Le #4530981
Bonsoir

Ton avis était le bon
la macro courre comme un lapin....
Merci

Cordialement

Patrice


"JLuc"
*Bonjour Patcas*,
A mon avis, c'est l'option DataOption1:=xlSortNormal qui passe pas sur
2000. Enleve et essaie, puis dis nous

rebonjour

Danie ton explication etait bonne la macro demarre mais.... hélas y a un
mais
un peu plus loin, elle donne erreur 1004...
elle bloque quand elle arrive sur :

Selection.Sort Key1:=Range("B86"), Order1:=xlDescending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Est-ce dû à un probleme de compatibilité entre versions differentes
d'Excel?
Chez moi ça marche super bien

avez vous une idee?
Merci

cordialement

Patrice



"Daniel"
Bonjour.
Soit il faut enlever la ligne "Option Explicit" (en tête de module), qui
oblige à définir toutes les variables, soit définir ces variables.
Cordialement.
Daniel
"Patcas" de news: o5d3i.21$%
bonjour

j'ai realisé sur mon PC une macro dans un fichier excel.
Celle ci fonctionne parfaitement.
Or ce fichier est fait pour etre installé sur un autre PC au bureau de
ma femme
Le probleme est que quand elle lance la macro, celle ci se bloque de
suite
en surlignant en jaune le nom de la macro
et ensuite quand elle clique dessus elle a un message
" erreur de compilation, variable non définie"
Pourriez vous me donner des direction de recherche pour localiser le
probleme
Merci d'avance

cordialement

Patrice C.







--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O







JLuc
Le #4530911
*Bonjour Patcas*,
Content que tu ais trouvé ;-)

la macro courre comme un lapin....


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Publicité
Poster une réponse
Anonyme