correction programme vba

gilbert_RGI

XLDnaute Barbatruc

• 27 Février 2008

• #2

Re : correction programme vba

Bonjour

employer ActiveCell à la place de Target

Cdlt

RGI

 

Vote positif 0 Vote négatif

Z

zumye

XLDnaute Occasionnel

• 27 Février 2008

• #3

Re : correction programme vba

bonsoir
j'ai remplacé les 3 targets par ActiveCell mais aucune réaction

 

Vote positif 0 Vote négatif

Excel_lent

XLDnaute Impliqué

• 27 Février 2008

• #4

Re : correction programme vba

Bonsoir à tous sans oublier les autres.

Gilbert a raison : Target n'est utilisable, tel que, hors d'une macro événementielle.
Si tu passes par celle du DoubleClick, utilise une variable comme dans l'exemple joint.

 

Pièces jointes

• ClicClicImprime E.zip

  7 KB · Affichages: 39

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 28 Février 2008

• #5

Re : correction programme vba

Bonjour

zumye à dit:

bonsoir
j'ai remplacé les 3 targets par ActiveCell mais aucune réaction

Cliquez pour agrandir...

j'ai fait ceci et ça fonctionne

Code:

Sub imprimer()
    Dim L As Integer, i As Integer
    L = Sheets("Recap").Range("A65536").End(xlUp).Row
    For i = 3 To L
        If ActiveCell = "" Then Exit Sub
        If ActiveCell = Range("A" & i) Then
            a = ActiveCell.Value
            Sheets(a).Select
            ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
            Sheets("Recap").Select
        End If
    Next
End Sub

à la condition que la feuille (a) existe et ne soit pas vide

Cdlt

RGI

 

Vote positif 0 Vote négatif

deudecos

XLDnaute Impliqué

• 28 Février 2008

• #6

Re : correction programme vba

Salut a tous,

Juste une petite remarque a Zumye,
Pourquoi n'avoir pas pose cette question sur le fil precedement ouvert puisque c'en est la continuite ?
https://www.excel-downloads.com/threads/imprime-feuilles-correspondant-a-une-colonne.91590/
Tu mobilise de l'espace forum pour rien...

Bonne journee

Olivier

 

Vote positif 0 Vote négatif

Z

zumye

XLDnaute Occasionnel

• 28 Février 2008

• #7

Re : correction programme vba

merci pour les réponses
pour deudecos, desolé je connais pas trop encore le fonctionnement du système mais ok pour ce coup ci j'ai compris
merci

 

Vote positif 0 Vote négatif

Z

zumye

XLDnaute Occasionnel

• 28 Février 2008

• #8

Re : correction programme vba

j'ai un problème de débogage
la linge : If nom = Range("A" & i) Then
est surligné en jaune
pouquoi? merci

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 28 Février 2008

• #9

Re : correction programme vba

Bonjour

vérifier le Range

nom correspond à quoi ?

 

Vote positif 0 Vote négatif

Z

zumye

XLDnaute Occasionnel

• 28 Février 2008

• #10

Re : correction programme vba

range , ca veut dire colonne?
car ca doit faire référence à la colonne a
merci

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 28 Février 2008

• #11

Re : correction programme vba

zumye à dit:

range , ca veut dire colonne?
car ca doit faire référence à la colonne a
merci

Cliquez pour agrandir...

Non 😡 Range ne veut pas dire colonne

c'est un objet qui représente une cellule unique ou une plage de cellules

dans Range("A" & i) c'est "A" qui représente la colonne
et i qui est une variable représentant le n° de ligne

 

Dernière édition: 28 Février 2008

Vote positif 0 Vote négatif