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
Configuration: Windows XP Internet Explorer 6.0

3 réponses

  1. Contributeur
    Bonjout 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
    -1
    1. Merci beaucoup Michel_m.

      Ca marche parfaitement maintenant :D
      0
  2. 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 !
    -1
    1. Bonjour,

      Dim alpha As Worksheet, beta as Worksheet

      Set alpha = Worksheets(1)
      Set beta = Worksheets(2)

      ;o)
      0