userforme

A

Arnaud

Guest

• 25 Mars 2004

• #2

salut,

voila un ch'ti exemple :
Private Sub UserForm_Activate()
UserForm1.Caption = ActiveWorkbook.Sheets(1).Name
End Sub

 

Vote positif 0 Vote négatif

F

Florent

Guest

• 25 Mars 2004

• #3

Bonjour Arnaud,le Forum

Je me suis mal exprimer, j'ai une liste de citation sur ma feuil 1 de mon classeur excel ( en A1 jusque A10 )et je souhaiterai qu'à chaque fois que j'ouvre mon userforme , une des citation se place dans la barre de titre.

Sinon ce que tu m'a proposé fonctionne


Florent

 

Vote positif 0 Vote négatif

W

wally

Guest

• 25 Mars 2004

• #4

Bonjour Florent et le forum,

Essaye ceci :

Private Sub UserForm_Activate()
'Initialiser le générateur de nombre aléatoire
Randomize
'Générer un nombre aléatoire entre 1 et 10
iRow = Int((10 * Rnd) + 1)
'Afficher la citation dans l'USF
UserForm1.Caption = ActiveWorkbook.Sheets(1).Range("A" & iRow)
End Sub


Slts

wally

 

Vote positif 0 Vote négatif

F

Florent

Guest

• 25 Mars 2004

• #5

Bonjour Wally, Arnaud, le Forum,

Merci, vous êtes tous vraimant très fort

A+

Florent

 

Vote positif 0 Vote négatif

B

Bouba

Guest

• 21 Janvier 2005

• #6

Bonjour
je viens de commencer en vba je peux dire que je suis encore nul:
je m'explique j'ai un classeur sous xls 2003 avec plusieur feuilles au moment de lancer mon classeur j'aurai un user forme qui se charge et mes feuilles soit invisible quelqu'un peux m'aider Merci.
Bouba

 

Vote positif 0 Vote négatif

H

Hervé

Guest

• 21 Janvier 2005

• #7

Bonjour

Pas sur d'avoir tout compris, si tu veux masquer des feuilles à l'ouverture de l'userform, regarde en pièce jointe.

Sinon, merci de préciser ta demande.

Attention : Je ne crois que ce soit possible de masquer toutes les feuilles d'un classeur, il faut au moins en garder une visible .

Salut
Hervé

 

Pièces jointes

• Classeur1.zip

  11 KB · Affichages: 53
• Classeur1.zip

  11 KB · Affichages: 61
• Classeur1.zip

  11 KB · Affichages: 64

Vote positif 0 Vote négatif