Excel Downloads Forums - Afficher un message

Dull · 10/04/2006, 18h41

Bonjour le Fil, Le Forum,

A mettre dans Perso.xls

Code:

Private Sub Workbook_Open()
Range('A1') = '3000 Posts de Savoir Faire'
If Range('A1').Value = '3000 Posts de Savoir Faire' Then

Range('A2') = '3000 Posts de LE Faire Savoir'
End If
End Sub

Euh... :huh: Je ne suis pas sur le fil 'Comment dire merci en VBA' Mince alors...ça c'est bête. Enfin si ce code peut servir

Bravo et Merci Hervé :lol: :lol: :lol:

10/04/2006, 18h41	#10 (permalink)
Dull XLDnaute Accro Date d'inscription: septembre 2005 Localisation: Saint-Pierre de la Réunion (974) Version Excel : Excel 2003 (PC) Messages: 1 499	Re:Et de 3000 pour Hervé Bonjour le Fil, Le Forum, A mettre dans Perso.xls Code: Private Sub Workbook_Open() Range('A1') = '3000 Posts de Savoir Faire' If Range('A1').Value = '3000 Posts de Savoir Faire' Then Range('A2') = '3000 Posts de LE Faire Savoir' End If End Sub Euh... :huh: Je ne suis pas sur le fil 'Comment dire merci en VBA' Mince alors...ça c'est bête. Enfin si ce code peut servir Bravo et Merci Hervé :lol: :lol: :lol: __________________ @+ Dull "Ti pas ti pas n'arrive Grandbois" Si lui arrive à me supporter , alors pas d'hésitations .... SupporterXLDDownloads