Vba excel worksheet variable

Résolu
MC's Assigned geek -  
 MC's Assigned geek -
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. Polux31 Messages postés 7219 Statut Membre 1 204
     
    Bonjour,

    Dim alpha As Worksheet, beta as Worksheet

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

    ;o)
    0
  2. ponpon
     
    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
  3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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. MC's Assigned geek
       
      Merci beaucoup Michel_m.

      Ca marche parfaitement maintenant :D
      0