Userform et code incomplet
Bonjour à tous,
Malheureusement après plusieurs heures de recherche, je n'arrive pas à récupérer les informations que l’utilisateur rentre dans mon formulaire (Userform que j'ai renommé InformationsSKU) par le biais de 3 TextBox (BoxSKU, BoxEtagere, BoxRack) ... à destination de la feuille "Adressage"
Je pense que la solution est proche pourtant ...
Ci dessous mon code :
Private Sub Valider_Click()
Dim SKU As String
Dim Etagere As Integer
Dim Rack As Integer
SKU = BoxSKU.Value
Etagere = BoxEtagere.Value
Rack = BoxRack.Value
InformationsSKU.Hide
Dim L As Long
L = Sheets("Adressage").Range("A65536").End(x1up).Row + 1 '/!\ erreur à ce niveau là
Range("A" & L).Value = SKU
Range("B" & L).Value = Etagere
Range("C" & L).Value = Rack
End Sub
Pourriez-vous m'aider SVP ?
Merci d'avance !
Bonjour et bienvenu(e)
dans cette partie
L = Sheets("Adressage").Range("A65536").End(x1up).Row + 1 '/!\ erreur à ce niveau làremplace x1up par xlUp