Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then
Code_Feuille = "F" & Range("Choix_Mois")
origine = True
Else
Code_Feuille =
ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If
ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate
MaMacro_qui_fait_plein_de_choses
....
je détermine le CodeName d'une feuille sur laquelle je veux travailler.
En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne
bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma
page "Récap" rest sélectionnée et évidemment, maintenant ma procédure
elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
--
@+ thierryp
-----------------
Passer pour un idiot aux yeux d'un imbécile est une volupté de fin
gourmet - G. Courteline
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then Code_Feuille = "F" & Range("Choix_Mois") origine = True Else Code_Feuille = ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate MaMacro_qui_fait_plein_de_choses ....
je détermine le CodeName d'une feuille sur laquelle je veux travailler. En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma page "Récap" rest sélectionnée et évidemment, maintenant ma procédure elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
Bonsour ThierryP,
Je t'exhibe une réplique et deux questionnements :
- La réplique : chez moi tes lignes de codage marchent finement (mais il est bon
de savoir que j'use Excel 15 sur le systeme opératoire Vista 4)
- Les questionnements :
1) Pourquoi user ActiveWorkbook.VBProject(...)Properties("_CodeName") bien que
ActiveSheet.CodeName semble engendrer le même result ?
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then
Code_Feuille = "F" & Range("Choix_Mois")
origine = True
Else
Code_Feuille =
ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If
ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate
MaMacro_qui_fait_plein_de_choses
....
je détermine le CodeName d'une feuille sur laquelle je veux travailler.
En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne
bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma
page "Récap" rest sélectionnée et évidemment, maintenant ma procédure
elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then Code_Feuille = "F" & Range("Choix_Mois") origine = True Else Code_Feuille = ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate MaMacro_qui_fait_plein_de_choses ....
je détermine le CodeName d'une feuille sur laquelle je veux travailler. En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma page "Récap" rest sélectionnée et évidemment, maintenant ma procédure elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
ThierryP
Merci Bilou !!
Réplique à la réplique : chez moi, sur un autre fichier, les mêmes lignes fonctionnent....Micro climat sans doute :-)))))
Les questionnements : 1) Parce que...il y a dû avoir une raison dans le passé !!!! 2) Non.
Finalement, les calories apportées par un repas ont permis à deux ou trois neurones de se reconnecter, et j'ai trouvé une solution.
Merci d'avoir fait plancher le staff Excel sur mon souci :-)))))
Bonsour ThierryP,
Je t'exhibe une réplique et deux questionnements :
- La réplique : chez moi tes lignes de codage marchent finement (mais il est bon de savoir que j'use Excel 15 sur le systeme opératoire Vista 4)
- Les questionnements :
1) Pourquoi user ActiveWorkbook.VBProject(...)Properties("_CodeName") bien que ActiveSheet.CodeName semble engendrer le même result ?
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then Code_Feuille = "F" & Range("Choix_Mois") origine = True Else Code_Feuille = ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate MaMacro_qui_fait_plein_de_choses ....
je détermine le CodeName d'une feuille sur laquelle je veux travailler. En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma page "Récap" rest sélectionnée et évidemment, maintenant ma procédure elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
-- @+ thierryp ----------------- Passer pour un idiot aux yeux d'un imbécile est une volupté de fin gourmet - G. Courteline
Merci Bilou !!
Réplique à la réplique : chez moi, sur un autre fichier, les mêmes
lignes fonctionnent....Micro climat sans doute :-)))))
Les questionnements :
1) Parce que...il y a dû avoir une raison dans le passé !!!!
2) Non.
Finalement, les calories apportées par un repas ont permis à deux ou
trois neurones de se reconnecter, et j'ai trouvé une solution.
Merci d'avoir fait plancher le staff Excel sur mon souci :-)))))
Bonsour ThierryP,
Je t'exhibe une réplique et deux questionnements :
- La réplique : chez moi tes lignes de codage marchent finement (mais il
est bon de savoir que j'use Excel 15 sur le systeme opératoire Vista 4)
- Les questionnements :
1) Pourquoi user ActiveWorkbook.VBProject(...)Properties("_CodeName")
bien que ActiveSheet.CodeName semble engendrer le même result ?
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then
Code_Feuille = "F" & Range("Choix_Mois")
origine = True
Else
Code_Feuille =
ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If
ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate
MaMacro_qui_fait_plein_de_choses
....
je détermine le CodeName d'une feuille sur laquelle je veux
travailler. En mode pas à pas, même si je suis sur ma page "Récap", je
sélectionne bien ma page Fxx, qui est ma feuille de calcul. En
éxécution auto, ma page "Récap" rest sélectionnée et évidemment,
maintenant ma procédure elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
--
@+ thierryp
-----------------
Passer pour un idiot aux yeux d'un imbécile est une volupté de fin
gourmet - G. Courteline
Il m'arrive un truc de dingue. Par ce bout de proc,
If ActiveSheet.Name = "Récap" Then Code_Feuille = "F" & Range("Choix_Mois") origine = True Else Code_Feuille = ActiveWorkbook.VBProject.VBComponents(ActiveSheet.CodeName).Properties("_CodeName")
End If ActiveWorkbook.VBProject.VBComponents(Code_Feuille).Activate MaMacro_qui_fait_plein_de_choses ....
je détermine le CodeName d'une feuille sur laquelle je veux travailler. En mode pas à pas, même si je suis sur ma page "Récap", je sélectionne bien ma page Fxx, qui est ma feuille de calcul. En éxécution auto, ma page "Récap" rest sélectionnée et évidemment, maintenant ma procédure elle marche beaucoup moins bien !!
Coup de fatigue d'Excel, de moi ou micro-climat ?????
Merci d'avance :-))))))
-- @+ thierryp ----------------- Passer pour un idiot aux yeux d'un imbécile est une volupté de fin gourmet - G. Courteline
