Discussion :

[Condekilo]

Bonjour,
J'ai un souci avec la programmation de mes macros.Je voudrais faire apparaitre une nouvelle feuille pour chaque nouveaux clients.Jusque là tout va bien ... Le problème est que quand ma UserForm apparait, comment définir l'emplacement des combotitre et combonom dans cette nouvelle feuille, et surtout, comment les mettre en page ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub CommandButton1_Click()
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = Combonom
Selection.Insert
With UserFormrenseignements
   .Combotitre.Text = ""
   .Combonom.Text = ""
End With
UserFormrenseignements.Hide
End Sub

Je suis perdu et m'arrache le peu de cheveux qu'il me reste ... Un petit coup de main SVP !
Merci d'avance

J'ai réussi a placer les données de mes userforms mais je n'arrive toujours pas a les mettre en page ! Help !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
Private Sub CommandButton1_Click()
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = Combonom
 
'Inscrit dans la cellule définie (VERTICAL,HORIZONTAL)'
Cells(2, 2).Value = Combotitre.Value
Cells(2, 3).Value = Combonom.Value
Cells(4, 2).Value = Combosociete.Value
Cells(5, 2).Value = Combomail.Value
Cells(6, 2).Value = Comboportable.Value
Cells(7, 2).Value = Combofixe.Value
Cells(9, 2).Value = TextBoxdebut.Value
Cells(9, 3).Value = TextBoxfin.Value
 
'Selectionne les données d'une cellule de la USERFORM'
Selection.Insert
With UserFormrenseignements
      .Combotitre.Text = ""
      .Combonom.Text = ""
      .Combosociete.Text = ""
      .Combomail.Text = ""
      .Comboportable.Text = ""
      .Combofixe.Text = ""
      .TextBoxdebut.Text = ""
      .TextBoxfin.Text = ""
End With
UserFormrenseignements.Hide
End Sub

merci

[bellande]

Bonjour,
Il est difficile de répondre précisément sans voir le contexte. Pouvez-vous joindre le fichier excel et éventuellement ajouter les éléments qui montreront le résultat escompté ?
Cordialement