Nom de l'utilisateur

Question

J'ai créé un userform (userform6) avec des zones de texte. Je dois donner un nom aux 5 dernières lignes.

Voici le code que j'utilise. Le code sélectionne également les cinq dernières lignes, mais une erreur s'est produite.

Dim n As Long 

n = 5 

Cells(Rows.Count, "A").End(xlUp).Offset(1 - n). _ 
Resize(n).EntireRow.Select 
Selection.Name = UserForm6.TextBox8.Text 

j'ai eu une erreur d'exécution 1004 et erreur met en évidence "selection.name = userForm6.TextBox8.Text". J'ai également vérifié les espaces, mais sans succès.

Toute aide serait grandement appréciée.

Answer 1

Vous recherchez actuellement un Range - pas Cells. En outre, vous n'avez pas besoin de Select, afin de Name il; alors pourquoi le ralentir?

Alors on y va:

Dim n As Long 
n = 5 
Range("A" & Rows.Count).End(xlUp).Offset(-n + 1).Resize(n).EntireRow.Name = UserForm6.TextBox8.Text