W WEIDER XLDnaute Impliqué 7 Juin 2017 #1 Bonjour à tous, Pourriez vous m'aider à résoudre mon problème s'il vous plait ! Tout est dit dans mon fichier joint. Merci beaucoup Amicalement, Pièces jointes Test.xlsx 12 KB · Affichages: 34
Bonjour à tous, Pourriez vous m'aider à résoudre mon problème s'il vous plait ! Tout est dit dans mon fichier joint. Merci beaucoup Amicalement,
W WEIDER XLDnaute Impliqué 7 Juin 2017 #2 Ma question se trouve sur l'onglet 'Nomenclature' Vote positif 0 Vote négatif
phlaurent55 Nous a quittés en 2020 Repose en paix 7 Juin 2017 #3 Bonjour weider, avec ces codes à mettre dans ThisWorkBook Code: Private Sub Workbook_Open() Sheets("Nomenclature").Select Range("A1").Select End Sub Private Sub Workbook_SheetActivate(ByVal Sh As Object) Range("A1").Select End Sub à+ Philippe Vote positif 0 Vote négatif
Bonjour weider, avec ces codes à mettre dans ThisWorkBook Code: Private Sub Workbook_Open() Sheets("Nomenclature").Select Range("A1").Select End Sub Private Sub Workbook_SheetActivate(ByVal Sh As Object) Range("A1").Select End Sub à+ Philippe
phlaurent55 Nous a quittés en 2020 Repose en paix 7 Juin 2017 #4 Re, voici le fichier à+ Philippe Pièces jointes 111.xlsm 17.1 KB · Affichages: 40 Vote positif 0 Vote négatif
W WEIDER XLDnaute Impliqué 7 Juin 2017 #5 Bonjour Barbatruc, Génial ! Merci beaucoup ça fonctionne très bien. Bonne journée. WEIDER Vote positif 0 Vote négatif