debutante en macro

D

dg

Guest

• 13 Février 2005

• #2

Bonsoir Virginie


Il suffit d'enregistrer tes actions dans une macro

Outils macro nouvelle macro

Boite de dialogue Enregistrer une macro

renseigner les champs

ensuite toute les actions effectuées sont enregistrées jusque l'appui sur le bouton arrêt de la macro.


Il est alors possible de modifier le code (outils macro...)


Bonne soirée

 

Vote positif 0 Vote négatif

Z

zeb83

Guest

• 13 Février 2005

• #3

Bonsoir regarde si cela te conviens

 

Pièces jointes

• couper.zip

  6.8 KB · Affichages: 23

Vote positif 0 Vote négatif

V

virginie

Guest

• 13 Février 2005

• #4

hello,

ok mais

lorsque je veux copier une cellule dans une autre je fais copier coller et la macro me copie la cellule sur laquelle je suis(la cellule selectionnée) et moi je veux qu'il me copie toujours la meme.


bonne soirée aussi

 

Vote positif 0 Vote négatif

Z

zeb83

Guest

• 13 Février 2005

• #5

ma macro ne fonctionne pas ?

 

Vote positif 0 Vote négatif

H

Hervé

Guest

• 13 Février 2005

• #6

bonsoir

Tu as du utiliser activecell qui correspond à la cellule active, essaye avec Range("a1") sui correspond à la cellule A1.

Salut
Hervé

 

Vote positif 0 Vote négatif

V

virginie

Guest

• 13 Février 2005

• #7

coucou zeb83

c'est ca!! juste que je voudrais qu'il copie et pas qu'il coupe .

donne moi la marche a suivre.
merci

 

Vote positif 0 Vote négatif

Z

zeb83

Guest

• 13 Février 2005

• #8

remplace dans la macro cut par copy

 

Vote positif 0 Vote négatif

V

virginie

Guest

• 13 Février 2005

• #9

bonsoir herve

voila ce que j'obtient


Selection.Copy
Sheets("Feuil2").Select
Range("A4").Select
ActiveSheet.Paste
End Sub

 

Vote positif 0 Vote négatif

H

Hervé

Guest

• 14 Février 2005

• #10

bonjour

Ce fil commence à être brouillon, je n'aurais peut-etre pas du intervenir pour ne pas brouiller les pistes, mais comme j'étais cité, j'ai pensé bien faire.

Excuse moi Zeb83

virginie,

la syntaxe complète pour copier la cellule A1 de la feuille 1 vers la feuille 2, est :

Public Sub vev()
Range("A1").Select
Selection.Copy
Sheets("Feuil2").Select
ActiveSheet.Range("A4").Select
ActiveSheet.Paste
End Sub

Ce code est à placer dans le module de la feuille 1, clique droit sur le nom de l'onglet puis visualiser le code.

Normalement ce code ce place dans un module standard, mais comme tu es débutante, on va pas t'embrouiller la tête.

Le copier coller, est à mon avis pas la plus grange réussite du VBA, je te donne une autre méthode pour réaliser ceci :

Si tu avais du utiliser une formule pour renvoyer la valeur de la cellule A1 de la feuille 1, vers la cellule A4 de la feuille 2 , tu aurais saisie en cellule A4 : =Feuil1!A1

en VBA on fait pareil :

Public Sub vev2()
Sheets("feuil2").Range("a4") = Sheets("feuil1").Range("a1")
End Sub

Salut
Hervé

 

Vote positif 0 Vote négatif

V

virginie

Guest

• 14 Février 2005

• #11

Bonjour, bonne saint valentin à tous,

merci hervé je commence à comprendre .
il était temps je suis d'accord!!

tu avais raison pour le copier coller c'est pas terrible.

j'aurais encore d'autres questions, c'est sure.

merci beaucoup.

 

Vote positif 0 Vote négatif