Comment afficher une feuille en VBA
Résolu/Fermé
A voir également:
- Vba afficher une feuille
- Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
- Excel reporter des données sur une autre feuille avec conditions - Forum Excel
- Feuille de pointage excel - Télécharger - Tableur
- Supprimer une feuille word - Guide
- Vba l'indice n'appartient pas à la sélection - Forum VB / VBA
2 réponses
Utilisateur anonyme
22 févr. 2008 à 14:20
22 févr. 2008 à 14:20
Bonjour,
Quelques observations ...
Je vous recommande d'éviter d'utiliser les accents de la langue dans les noms d'objets
Sub afficher_détails() ->>> Sub Afficher_Details()
Dans le nom de vos objets, insérer quelques majuscules
Lors de la saisie, vous tapez en minuscule, et après le [ Enter ], les majuscules s'afficheront
automatiquement, ce qui confirme la syntaxe du mot !
Votre structure de IF est linéaire, vous pourriez utiliser une structure [ Select Case ]
exemple type :
Si vous recherchez des exemples de code, je vous recommande mon classeur
VizioXLA que vous trouverez sur excel-download à cette adresse :
https://www.excel-downloads.com/resources/categories/utilitaires.18/
repérer VizioXLA
sans prétention, ce classeur démontre comment utiliser les objets Excels.
Lupin
Quelques observations ...
Je vous recommande d'éviter d'utiliser les accents de la langue dans les noms d'objets
Sub afficher_détails() ->>> Sub Afficher_Details()
Dans le nom de vos objets, insérer quelques majuscules
Lors de la saisie, vous tapez en minuscule, et après le [ Enter ], les majuscules s'afficheront
automatiquement, ce qui confirme la syntaxe du mot !
Votre structure de IF est linéaire, vous pourriez utiliser une structure [ Select Case ]
exemple type :
Sub Afficher_Details() Select Case (Range("D19").Value) Case "Valeur1": AfficheFeuille ("Feuil5") ' Soyez vigilent sur le nom des feuilles Case "Valeur2": AfficheFeuille ("Feuil6") ' Est vraiment [ Feuille5 ], le nom standard Case "Valeur3": AfficheFeuille ("Feuil7") ' devrait être [ Feuil5 ], et ainsi de suite ... End Select End Sub ' Function AfficheFeuille(ByVal LaFle As String) Sheets(LaFle).Visible = True ' Si la feuille est masqué, vous devez la rendre visible Sheets(LaFle).Select ' avant de la sélectionner End Function '
Si vous recherchez des exemples de code, je vous recommande mon classeur
VizioXLA que vous trouverez sur excel-download à cette adresse :
https://www.excel-downloads.com/resources/categories/utilitaires.18/
repérer VizioXLA
sans prétention, ce classeur démontre comment utiliser les objets Excels.
Lupin
22 févr. 2008 à 14:30
Je vais essayer également d'appliquer cette syntaxe en y ajoutant l'affichage de la feuille. (Ce que j'avais effectivement oublié).
Il y a 8 jours encore, je ne savais pas ce qu'était une macro, c'est dire ce qu'il reste à faire...
Cordialement
GB