Macro VBA trop dur pour moi...;)

Pour toutes vos questions à propos d'Excel ...

Macro VBA trop dur pour moi...;)

Messagepar nicocomptable » 08 Nov 2006, 02:41

Bonjour,

Je recherche à créer une macro qui execute une multitude d'action enchainés mais je suis totalement nul en VBA et après avoir passé toute la soirée à essayer d'apprendre le language je sèche totalement

Voilà le résultat que je veux avoir :

Lorsque l'on se situe sur une cellule (quelquonque)et que l'on lance la macro les actions qui doivent être exécutées sont les suivantes :

1/Insérer 4 lignes sous cette cellule
2/Ouvrir une InputBox qui demande "Quel est le libellé du compte ?"
3/Mettre la réponse dans la cellule A en dessous de la cellule séléctionnée
4Ouvrir une InputBox qui demande "Quel est le numéro du compte ?"
5/La réponse doit s'insérer sous le libéllé
6/Copier l'ensemble des cellules des colonnes B à N des 3 lignes situées au dessus de la cellule sélectionnée
7/ Il faut remplacer La valeur recherchée des formules (RECHERCHEV)copier en 6/ (pour info 72 remplacements à effectuer)... je voulais faire ça par une InpubutBox

Bon c'est super compliqué même moi je ne comprend plus ce que je veux dire...:(

Donc je joins un bout de tableau avec la notice de la procédure actuel que je veux automatisé...

Je suis par avance désolé d'être aussi prise de tête. Mais promis je vais continuer à apprendre...

Merci beaucoup de votre aide et bravo pour se forum, j'ai appris des tonnes de truc (mais a priori pas asser pour être à la hauteur de mes ambitions...)
nicocomptable
Jeune membre
 
Messages: 28
Inscription: 01 Nov 2006, 21:01
Localisation: GRENOBLE
Version Excel: 2007 FR

Sujet du message: Macro VBA trop dur pour moi...;)

Messagepar Amadéus » 08 Nov 2006, 11:58

Bonjour nicocomptable

Tu as oublié de joindre le bout de tableau et la notice annoncés.

Cordialement

Amadéus
Amadéus
Modérateur
 
Messages: 10874
Inscription: 07 Mai 2006, 11:18
Localisation: Ariège-Pyrénées France
Version Excel: Office Excel 2003 FR

Messagepar soft » 08 Nov 2006, 16:05

Pour les 5 premiers points demandés :

Code: Tout sélectionner
Sub MacroNico()
    'déclaration des variables
    Dim Ligne As Long, Question As String
   
    '1/Insérer 4 lignes sous cette cellule
    Ligne = ActiveCell.Row
    Rows(Ligne + 1 & ":" & Ligne + 4).Insert Shift:=xlDown

    '2/Ouvrir une InputBox qui demande "Quel est le libellé du compte ?"
    Question = InputBox("Quel est le libellé du compte ?", "n° de compte")

    '3/Mettre la réponse dans la cellule A en dessous de la cellule séléctionnée
    Range("A" & Ligne + 1).Value = Question

    '4Ouvrir une InputBox qui demande "Quel est le numéro du compte ?"
    Question = InputBox("Quel est le numéro du compte ?", "Libellé")
   
    '5/La réponse doit s'insérer sous le libéllé
    Range("A" & Ligne + 2).Value = Question
End Sub


Pour les 2 derniers, sans fichiers exemple, je ne comprends pas bien ce que tu veux faire...
soft :spider:
soft
Membre fidèle
 
Messages: 171
Inscription: 29 Sep 2005, 17:24
Localisation: Suisse
Version Excel: FR 2003 & 2007

Macro VBA trop dur pour moi...;)

Messagepar Amadéus » 08 Nov 2006, 16:35

Bonjour nico..

La même réponse que soft en XL4

Cordialement

Amadéus

http://www.excel-pratique.com/~files/doc/Nico.xls
Amadéus
Modérateur
 
Messages: 10874
Inscription: 07 Mai 2006, 11:18
Localisation: Ariège-Pyrénées France
Version Excel: Office Excel 2003 FR

Messagepar nicocomptable » 08 Nov 2006, 21:35

Bonsoir,

Waou, franchement : MERCI !!!

C'est vrai que j'avais envoyer le fichier...

Donc le voici,

J'ai un peu changé d'idée pour les points suivants pour que se soit plus clair donc :

6/ entrer les formules suivantes :
6.1 Colonne B (en face du libellé du compte :somme(C(ligne où se situe le libellé du cpt):N(cellule où se situe le libéllé du compte)
Colonne B (en face du numéro de compte :somme(C(ligne où se situe le numéro de cpt):N(cellule où se situe le numéro de compte)
Puis idem mais sur le ligne d'en dessous

6.2 Colonne C (en face du libellé d compte) :
SI(RECHERCHEV($A$(Cellule du numéro de compte);'Balances N'!$A$3:$Z$850;4)=0;-RECHERCHEV($A$(Cellule du numéro de compte);'Balances N'!$A$3:$Z$850;3);RECHERCHEV($A$(Cellule du numéro de compte);'Balances N'!$A$3:$Z$850;4))
Colone D (en face du libellé d compte) : idem mais en changeant les index de colonne par 6,5,6 au lieu de 4,3,4
et ainsi de suite jusqu'en colone N
Colone D (en face du numéro de cpt) Idem mais en changeant 'Balances N' par 'Balances N-1'

6.3 sur la Colonne A en dessous dessous de Numéro de compte mettre le texte "Ecart N/N-1)

6.4 Enfin sur cette même ligne faire la différence de chaque cellule des colonne B à N des lignes (Nom du compte) et (Numéro de compte)

7 pour finir une MessagBox avec un texte genre "Réalisé avec succès"...

Bien sûr une ligne de chaque formule me suffira amplement...

Bon je pense que je vous ai fait mal à la tête et j'en suis navré...

J'éspère que le tableau test sera plus parlant que moi...

Meci d'avance vous êtes trop fort...

A bientôt.

Nico

http://www.excel-pratique.com/~files/doc/test macro.zip
nicocomptable
Jeune membre
 
Messages: 28
Inscription: 01 Nov 2006, 21:01
Localisation: GRENOBLE
Version Excel: 2007 FR

Messagepar nicocomptable » 08 Nov 2006, 21:37

Zut encore loupé pour le fichier, le voilà :

http://www.excel-pratique.com/~files/doc/testmacro.zip
nicocomptable
Jeune membre
 
Messages: 28
Inscription: 01 Nov 2006, 21:01
Localisation: GRENOBLE
Version Excel: 2007 FR

Macro VBA trop dur pour moi...;)

Messagepar Amadéus » 09 Nov 2006, 01:44

Bonsoir Nico..

Fichier et mode d'emploi

Cordialement

Amadéus

http://www.excel-pratique.com/~files/doc/TestMacro.zip
Amadéus
Modérateur
 
Messages: 10874
Inscription: 07 Mai 2006, 11:18
Localisation: Ariège-Pyrénées France
Version Excel: Office Excel 2003 FR

Messagepar nicocomptable » 09 Nov 2006, 14:44

Bravo !

Merci beaucoup c'est exactement ça.

Mais :? , je n'ai jamais vu de macro tapée direct dans Excel et je ne comprends pas comment l'exporter car je dois l'installer sur plusieurs tableau chez plusieurs clients...

Y a-t-il un moyen pour l'avoir dans VBA où pour l'exporter sachant que je voudrais qu'elle soit "invisible".

Merci d'avance pour votre réponse...

Nico
nicocomptable
Jeune membre
 
Messages: 28
Inscription: 01 Nov 2006, 21:01
Localisation: GRENOBLE
Version Excel: 2007 FR

Macro VBA trop dur pour moi...;)

Messagepar Amadéus » 10 Nov 2006, 16:52

Bonjour Nico

Fichier joint. Explications sur la feuille "Notice"

Cordialement

Amadéus

http://www.excel-pratique.com/~files/doc/Essai.zip
Amadéus
Modérateur
 
Messages: 10874
Inscription: 07 Mai 2006, 11:18
Localisation: Ariège-Pyrénées France
Version Excel: Office Excel 2003 FR

Messagepar nicocomptable » 14 Nov 2006, 01:05

Merci Amadéus, c'est parfait !!!

En revanche, je voulais créer une autre macro dans la même feuille, mais je ne sais pas la déclaré n'ayant fait de macro XL4; :cry:

Je ne dois pas être bien doué mais là je cale... Après promis je me débrouille...

http://www.excel-pratique.com/~files/do ... umacro.zip
nicocomptable
Jeune membre
 
Messages: 28
Inscription: 01 Nov 2006, 21:01
Localisation: GRENOBLE
Version Excel: 2007 FR

Suivante

Retourner vers Excel - VBA

 


  • Sujets similaires
    Réponses
    Vus
    Dernier message

Utilisateurs en ligne

Utilisateurs parcourant ce forum: Bing [Bot], Google [Bot], Google Adsense [Bot] et 4 invités