Microsoft 365 Affichage usform

Darkv59

XLDnaute Nouveau
Bonjour à toutes & a tous
je suis novice en vba et je cherche à afficher deux usform cote a cote avec les infos de ma feuille (Boissons)
le soucis et que dans le 2ieme usform je n'arriva pas a enlever les label et textbox sans avoir un message d'erreur
je vous joint un fichier
d'avance merci
 

Pièces jointes

  • inventaire.xlsm
    28.8 KB · Affichages: 11

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Darkv
Pas bien compris votre demande.
Si dans USFInv2 vous supprimez labels et textbox et que vous supprimez le code VBA correspondant, cela semble marcher. Voir PJ.
D'autre part vos deux longues macros peuvent se simplifier avec :
VB:
Private Sub UserForm_Initialize()
USFInv.TextBox1.Value = Date
For i = 4 To 19
    USFInv.Controls("TextBox" & i).Text = Sheets("Boissons").Cells(i - 2, "C")
    USFInv.Controls("Label" & i).Caption = Sheets("Boissons").Cells(i - 2, "B")
Next i
End Sub
... si j'ai bien compris. :)
 

Pièces jointes

  • inventaire.xlsm
    27.4 KB · Affichages: 8

Darkv59

XLDnaute Nouveau
bonsoir et merci de vous avoir penché sur mon post et effectivement je me suis mal exprimé , dans mon 1er inventaire j'ai les softs et dans mon deuxième les alcools plus fort , avec mon code actuel j'affiche bien les softs mais ensuite pour le 2ieme je souhaite afficher les autre boissons qui commence a partir de textbox et label 21.
je vais regarder ce que vous m'avez envoyé et je reviendrai vers vous mais avant dodo

bonne soirée
 

Discussions similaires