Discussion :

[phlg77]

Bonjour,
je débute dans la "programmation" excel VBA .J'ai déjà réalisé quelques petites applications pour mon usage personnel et là je bute...
J'ai récupéré sur une copie d'écran une ligne de code correspondant à un besoin mais cela ne fonctionne pas et je ne sais pas corriger l'erreur...
Voici

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Selection.Insert Shift:"xlDown, CopyOrigin:"xlFormatFromLeftOrAbove

Les deux caractères " sont probablement responsables ....
Merci d'avance de votre aide
Philippe

[phlg77]

je poursuis mes tentatives et je viens d'essayer cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

...mais alors j'obtiens ce message d'erreur :


La méthode Insert de la classe Range a échoué
Il semblerait donc que le problème "d'orthographe" soit résolu mais qu'il en subsiste un autre....
J'espère que cela va inspirer quelqu'un...
Merci

[phlg77]

Voici le sous programme complet...
Je cherche à recopier une ligne sur la ligne d'en dessous pour libérer la ligne initiale...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub CommandButton1_Click()
Rows("2:2").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
 
End Sub

[phlg77]

Bon...
je ne pige toujours pas mais le problème ne vient pas du code....puisque je l'ai testé sur une feuille vierge et il fonctionne parfaitement!!!!.
Alors, qu'est ce qui en empêche le bon fonctionnement sur mon fichier de travail???? ...et je crains que personne ne puisse à distance en trouver la raison...
Je vais continuer à chercher...

[eric4459]

Bonjour Philippe,
Essayes ceci, c'est déjà plus simple et cela évite l'utilisation de .Select qui est déconseillé par certains membres du forum.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Rows("2:2").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

Sinon que veux-tu réaliser exactement?
Eric

[phlg77]

Bonjour Eric,
je viens de tester ta proposition et cela a les mêmes effets que la mienne, même message d'erreur....
Comme je l'ai dit plus haut, je cherche à rentrer à l'aide d'un formulaires, des données concernant de nouveaux adhérents pour un club. Je cherche donc à libérer la première ligne de mon tableau en décalant toutes les entrées d'une ligne vers le bas de sorte qu'elle soit tout le temps disponible pour entrer les données d'un adhérent supplémentaire ( je fais un tri par la suite).
Je vais recommencer mon tableau depuis le début afin d'identifier ce qui fait blocage.
Merci en tout cas de ta réponse!!

[eric4459]

Bonjour Philippe,
J'ai testé le code sur ma version Excel et cela fonctionne, j'utilise Excel2010 peut-être as-tu une version antérieure?
Tu pourrais essayer d'enregistrer une macro en réalisant l'action d’insérer une ligne sur ta version Excel et regarder comment est le code généré automatiquement, tu pourras ensuite comprendre le code et l’insérer dans ta macro.
Eric

[pgz]

Bonjour,

Et en utilisant l'IHM (= à la main) tu parviens à insérer une ligne dans la feuille ?

Cordialement,

PGZ

[phlg77]

pour moi aussi mon code fonctionne, mais dans une feuille vierge, autre que celle sur laquelle je travaille!! C'est ce qui rend le problème assez mystérieux!!...et oui j'ai une version antérieure....2003
PGZ: je le pige pas ce que tu veux dire par l'IHM....

[SfJ5Rpw8]

...t cela a les mêmes effets que la mienne, même message d'erreur....
..

Bonjour,
tu aurais donc lu le message d'erreur ? mais je ne vois pas ou tu as reporté ce que tu as lu ?

[phlg77]

Dans mon deuxième message....il est vrai que j'aurais dû l'isoler. ... :-)

[eric4459]

Bonsoir,
IHM signifie Interface Homme Machine, Pgz doit faire allusion à l'enregistreur de macros.
Donc tu devrais essayer d'enregistrer une macro en réalisant l'action que tu souhaites puis regarder le code que l'enregistreur a généré en sélectionnant la macro puis en cliquant sur Modifier.
Je vais enregistrer un fichier exemple sous excel 2003 demain et te l'enverrai.
Sinon il y un tutoriel vraiment très bien fait sur le Vba réalisé par un membre du forum qui pourra t'aider dans beaucoup de situations, voici le lien :

http://silkyroad.developpez.com/

Eric

[phlg77]

alors, c'est une chose que j'ai faite....mais comme je le disais, le problème ne vient pas du code mais très probablement de quelque chose dans mon fichier excel hors VBA.qui gêne d'une manière ou d'une autre....sinon, pourquoi une ligne de code fonctionnerait-elle dans une feuille (ébauche très sommaire de la deuxième) et pas dans une autre, celle sur laquelle je travaille??
Je vais continuer à chercher et je finirai bien par trouver!!
en tout cas, merci à tous pour votre intérêt!! :-)

[SfJ5Rpw8]

et donc tu as enregistré à nouveau une macro effectuant l'insertion de la ligne et tu n'as pas eu de problème ?

[HopPopPop]

Bonsoir à tous,

Et si tu essayais tout simplement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Rows(2).Insert

Une recommandation toutefois, il est toujours utile de préciser sur quelle feuille s'effectuent les modifications ...

Edit :
Ta feuille est-elle protégée ?

[phlg77]

alors....
bbil : exactement, cette macro fonctionne parfaitement, mais pas dans ma feuille !! :-)
Hop : j'essaierai demain....et non la feuille n'est pas protégée, pour l'instant

[SfJ5Rpw8]

...
bbil : exactement, cette macro fonctionne parfaitement, mais pas dans ma feuille !! :-)
...

c'est pas la question : as tu essayé à nouveau d'enregistrer une nouvelle macro ?

[phlg77]

ce n'est peut-être pas la question, mais c'est ma réponse....oui, j'ai essayé plusieurs fois d'enregistrer une nouvelle macro, et de plusieurs façons différentes...et le résultat est le même....ça fonctionne dans un cas et pas dans l'autre....

[phlg77]

bon....je vous tiens au courant mais le mystère n'est pas éclairci....
Comme je l'avais dit, j'ai tout recommencé depuis le début en commençant par cette fameuse macro et en faisant pratiquement à chaque étape de la construction de ma feuille une vérification de son bon fonctionnement.
Et bien tout fonctionne...ce qui prouve bien que le problème ne venait pas du code mais ,je le suppose, d'un souci avec la mise en forme de la feuille ou quelque chose du même genre....mais que je n'ai pas identifié..
Tout est bien qui finit presque bien :-)
Merci à tous en tout cas pour votre attention et vos conseils
Philippe