Bonjour à tous.  
 
Mes compétences informatique sont inexistante dans le VBA comme quasiment partout ailleurs dans le language informatique.  
 
Je me suis balader de forum en forum pour essayer d'aboutir à mon objectif qui est le suivant:  
Ouvrir un fichier excel grace à un bouton.  
 
Au début j'affectais un lien hypertexte, mais cela me faisais ouvrir d'énorme quantités de pages excel dans ma barre de tache.    
 
J'ai donc essayer d'affecter des marcos à mon bouton pour ouvrir mon fichier quand je clique sur le bouton sans que je me retrouve avec pleins de pages excels.  
 
Le but étant de pouvoir naviguer sur excel en gardant toujours la même page.  
 
J'ai donc essayer de piaucher quelques lignes de macros sur des forums en espérant que ca marche:
Voici le programme suivant: (les commentaires signifient ce dont je "pense" que la ligne exécute)  
 
Sub tranche_zéro()
    Dim OUV As Variant 'Déclaration de variable
    Dim t As Variant 'Déclaration de variable
     
        OUV = 0
        For t = 1 To Workbooks.Count 'Rebouclage pour eviter d'ouvrir à chaque fois mon fichier "0LGGb.xls rouver ca dans un forum
        If Workbooks(t).Name = "0LGGb.xls" Then OUV = 1
        Next t
        If OUV = 0 Then Workbooks.Open Filename:="C:\Users\I60774\Documents\Synoptique Tranche 0\6.6kV\0LGGb.xls"
    End Sub
     
Private Sub CommandButton1_Click()  'lors du clique sur l'objet...
   Dim tranche_0 As Variant 'Déclaration de variable
    tranche_0.Hide 'Fermer le fichier Excel Tranche 0
End Sub
Sub Ouverture_fichier()
Dim ActivateWorkbook As Variant 'Déclaration de variable
Static LGGb As Variant 'Déclaration de variable
Dim tranche_0 As Variant 'Déclaration de variable
   Workbooks.Open Filename:="C:\Users\I60774\Documents\Synoptique Tranche 0\6.6kV\0LGGb.xls" 'Ouverture du fichier voulu(0LGGb)
   LGGb = ActivateWorkbook.Name 'activation du fichier voulant être ouvert
   Workbooks(LGGb).Activate 'activation du classeur LGGb à la place du fichier Excel Tranche_0
   Close tranche_0 ' fermer la page ou j'ai cliquer sur l'objet
   Sheets("Feuille 1" ).Select 'Ouvrir la feuille1 du fichier 0LGGb
    ActiveWindow.DisplayWorkbookTabs = False 'fermer le classeur Tranche 0
   Application.DisplayFullScreen = True 'Ouverture sur la même page Excel
     
End Sub
 
 
J'ai trouver ca dans un livre mais ca ne marche pas non plus... :  
 
Sub LGG_zéro()
Dim LGGzéro As String
    Open "C:\Users\I60774\Documents\Synoptique Tranche 0\6.6kV\0LGGb.xls" For Input As #1
        While Not EOF(1)
         Line Input #1, LGGzéro
        Wend
        Close #1
End Sub
Merci de votre aide.

 
           Bonjour …

            Si le lien est bien fait, il n'y a qu'un seul icône pour le classeur ouvert …
            Énormément d'erreurs dans les commentaires ‼  Afin de comprendre l'utilité d'une instruction, il y a la touche !
 
            Des lignes ne servent à rien mais comme la balise de code n'a pas été utilisée, je ne vais pas m'amuser à les compter !
            Par exemple, quand un classeur est ouvert, il est actif de facto.   Et la propriété  Name  n'active pas un classeur !
 
            Un classeur n'est pas un vulgaire fichier texte, donc la procédure LGG_Zéro est une hérésie, Vade Retro Satanas ‼
 
            Sinon en dehors de lignes de code dont le but est pour le moins incertain, on ne comprend même pas quel est le besoin !
 

            Ne veut rien dire !
 
            Qu'est donc une page excel ?
 
            Naviguer par définition veut dire se déplacer, donc pas logique en gardant toujours la même page ! …
 
 
            Pour pourvoir aider, il faut comprendre et donc, à vous d'exprimer clairement votre besoin sans ambiguïté aucune
            en respectant la terminologie d'Excel : classeur, feuille de calcul, …
 
 
            Autre option :  utiliser l'Enregistreur de macros pour avoir une base de code …
 
 
            ______________________________________________________________________________________________________________
            Comme la vitesse de la lumière est supérieure à celle du son, certains ont l'air brillant avant d'avoir l'air con !
  

Comme j'ai des problèmes d'expression et de compréhension dans ma vie courante; je vais prendre exemple sur quelqu'un qui a le même soucis que moi pour que cela soit plus claire pour vous. Je vous invite à regarder le lien suivant:
 
http://www.commentcamarche.net/for [...] xecution-9
 
Merci de votre aide.

Vous ne m'aider pas trop là...

 
           Attendons de voir si d'autres arrivent à deviner le besoin …