Vba excel worksheet variable
Résolu
Bonjour,
J'ai un problème trés stupide, mais je suis en train de m'arracher les cheveux... et il ne m'en reste déjà pas beaucoup, alors je fais appel à votre savoir avant d'être chauve:
Dim alpha as Sheets ,beta as Sheets, charlie as Sheets
alpha = activesheet
activeSheet.next.Activate
beta = activesheet
activeSheet.next.Activate
Charlie = activesheet
ca ne marche pas...
J'ai également éssayé avec :
Alpha= activesheet.name
rien à faire
Dans le même esprit;
WB = activeworkbook
ne marche pas...
Il s'agit en fait simplement de faire référence à des feuilles ou à des classeurs par une variable défini dans la macro
Merci d'avance et bonne journée
MC's A gK
J'ai un problème trés stupide, mais je suis en train de m'arracher les cheveux... et il ne m'en reste déjà pas beaucoup, alors je fais appel à votre savoir avant d'être chauve:
Dim alpha as Sheets ,beta as Sheets, charlie as Sheets
alpha = activesheet
activeSheet.next.Activate
beta = activesheet
activeSheet.next.Activate
Charlie = activesheet
ca ne marche pas...
J'ai également éssayé avec :
Alpha= activesheet.name
rien à faire
Dans le même esprit;
WB = activeworkbook
ne marche pas...
Il s'agit en fait simplement de faire référence à des feuilles ou à des classeurs par une variable défini dans la macro
Merci d'avance et bonne journée
MC's A gK
Configuration: Windows XP Internet Explorer 6.0
3 réponses
-
ContributeurBonjout tt le monde
Sub shadock() Dim beta As Object On Error GoTo erreur ActiveSheet.Next.Activate Set beta = ActiveSheet 'pour essai With beta Range("A1") = "ga bu zo meu" End With Exit Sub erreur: MsgBox " action effectuée sur dernière feuille" End Sub -
Bonjour,
Au lieu de dire : ca ne marche pas... , il serait bien de mentionner le message d’erreur et éventuellement la ligne de la procédure en jaune ! -
Bonjour,
Dim alpha As Worksheet, beta as Worksheet
Set alpha = Worksheets(1)
Set beta = Worksheets(2)
;o)