VBA - codage pour aller d'une valeur de cellule vers un fichier avec onglet spécifique

Version imprimable

30/04/2018, 10h33
Greg1982

VBA - codage pour aller d'une valeur de cellule vers un fichier avec onglet spécifique

Bonjour,

Je n'arrive pas à coder la demande suivante:
Fichier 1 sur valeur de la cellule A1 = 1 ouvrir fichier 2 onglet 1 et si valeur cellule A1=2 ouvrir fichier 2 onglet 2
J'ai essayé avec la fonction If ==> goto mais je bloque.
Merci pour votre aide.
30/04/2018, 11h10
unparia

Bonjour

Citation:

J'ai essayé avec la fonction If ==> goto mais je bloque.

Montre le code que tu as essayé (la procédure entière) en nous précisant si le classeur dans lequel tu veux te rendre a été ouvert (et comment) et appartient donc à la collection Workbooks.

Salut,

Voici une proposition de code.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub toto()
    'Attention, il faut que la cellule A1 contienne un Entier.
    'Et ce N° doit correspondre à un N° de feuille existante dans le classeur ouvert
 
    'Déclaration d'une variable pour stocker le N° de feuille à activer
    Dim numfeuille As Integer
 
    'on mémorise le N° de la feuille
    numfeuille = Cells(1, 1).Value
 
    'ouverture du fichier
 
    'Après ouverture du fichier on active la feuille qui va bien
    ActiveWorkbook.Sheets(numfeuille).Select
End Sub

En espérant que cela fasse ce que tu veux.

30/04/2018, 11h18
Greg1982
Citation:

Envoyé par unparia

Bonjour

Montre le code que tu as essayé (la procédure entière) en nous précisant si le classeur dans lequel tu veux te rendre a été ouvert (et comment) et appartient donc à la collection Workbooks.
Code:

1 2 3 4 5 6 7 8 9 Sub Macro2() ' ' Macro2 Macro ' If Sheets("Relevé analyse vibratoire").Range("e4").Value "rigide" goto Windows("Rapport1").Activate Sheets("Rigide").Select End If End Sub
Le fichier "Rapport1" est déjà ouvert. Ce fichier sera ouvert au démarrage de la macro.

Merci.
30/04/2018, 11h29
unparia

Ah ...
Et si (ce serait vraiment un minimum de chez minimum) tu commençais par étudier la syntaxe d'une expression contionnelle (If ...) ?
Si le bât blesse déjà à ce niveau, il vaut sans aucun doute mieux que tu t'intéresses au moins aux rudiments.
Je ne t'aiderai personnellement qu'ensuite.
Je suis très franchement désolé.
01/05/2018, 10h17
jerome.vaussenat

Salut,

Et parce que je partage le point de vue de Unparia, voici un lien pour tout savoir sur le VBA et devenir le plus autonome possible.

https://laurent-ott.developpez.com/t...el-vba-tome-1/

Bonne lecture