Erreur type mismatch avec instruction "rows"

Bonjour,

je suis débutant en vba et j'ai un soucis "run time error 13, type mismatch" concernant une ligne de ma macro qui consiste à extraire un nombre de ligne choisi d'un tableau dans un fichier pour l'integrer dans un tableau avec le même nombre de champ mais dans un autre fichier . Voici la partie de ma macro qui me pose des problèmes :

Dim nb_ligne_basic As Integer

Rows("2: nb_ligne_basic").Select

Je bloque dessus depuis hier et je n'ai trouvé aucun autre sujet qui a pu m'aider.

et une deuxième question: comment puis-je ouvrir le fichier source et réaliser l'extraction sans que se soit visible à l'écran ?

Merci d'avance à ceux qui regarderont mon problème.

Bonjour,

essaye peut être comme ceci :

Dim nb_ligne_basic As Integer
nb_ligne_basic = 3
Rows(nb_ligne_basic).Select

bien qu'en vba les "select" soient rarement nécessaires...

bonne journée

@+

Edition : code modifié, pas vu le "2:" moi....

Bonjour et bienvenue sur le forum

Essaie cette instruction :

Rows("2:" & nb_ligne_basic).Select

Bye !

Merci beaucoup pour vos réponses aussi rapides.

ta solution gmb fonctionne.

Parcontre Pierrot quand j'ai essayé ta solution j'ai eu un message "erreur syntaxe".

Re,

bonjour gmb

Parcontre Pierrot quand j'ai essayé ta solution j'ai eu un message "erreur syntaxe".

oui normal, j'ai édité ma répense entre temps mais ne devrait pas convenir, ne tenant pas compte du "2:"....

une autre question :

comment je peux faire pour choisir la ligne de départ de la sélection ?

renseigner une nouvelle variable ligne_depart et lui assigner la valeur souhaitée, pas de soucis.

Parcontre comment écrire l'instruction de la sélection ?

Comme cela :

Rows(PremièreLigne & ":" & nb_ligne_basic).Select

Ou encore avec une boite de dialogue, mais là, il te faudra adapter...

Bye !

Merci c'est parfait ma macro marche.

Bye.