Vladsmice
Messages postés22Date d'inscriptionjeudi 16 mai 2002StatutMembreDernière intervention18 avril 2005
-
17 mai 2002 à 10:06
nadeare01
Messages postés10Date d'inscriptionmercredi 10 décembre 2008StatutMembreDernière intervention29 avril 2009
-
8 avril 2009 à 03:18
Voici mon prblème, je veux copier des cellules sur une deuxième feuille en partant de E6 pour le premier coller et jusqu'à E65526 pour le dernier. Mais mon programme n'arrive pas à sélectionner la cellule, qui doit s'incrémenter de 8 à chaque coller.
Donc voici mon prog:J'ai un problème quand je veux sélectionner ma cellule (I)!
Voici le petit prog:
Sub Insérer ()
I= E6
If I <> 0 Then
I= I+8
ActiveSheet.range (I). Select [Ca ne fonctionne pas!]
Selection.PasteSpecialPaste : =x1 Paste Values, Operation := x1 Non, SkipBlanks _ := False, Transpose := False
Else
Activesheet.range I. Select [Ca ne fonctionne pas!]
Selection.PasteSpecialPaste : =x1 Paste Values, Operation :=x1 Non, SkipBlanks _ := False, Transpose := False
End If
End Sub
SVP, je suis vraiment bloqué, merci de rendre vos réponses.
Vladsmice
Messages postés22Date d'inscriptionjeudi 16 mai 2002StatutMembreDernière intervention18 avril 2005 17 mai 2002 à 14:32
Salut,
Merci pour ta réponse mais en fait, je colle juste les infos sur 8 lignes car je copie 8 lignes. Puis je voudrais qu'à chaque fois que je copie, il s'incrémente, c'est à dire que si en E6, il y a quelque chose, qu'il copie en E6+8, c'est à dire E14 et ainsi de suite.
Merci pour ta réponse.
@+
nadeare01
Messages postés10Date d'inscriptionmercredi 10 décembre 2008StatutMembreDernière intervention29 avril 2009 8 avril 2009 à 03:18
bonjour
j'aimerai ajouter un label sur un userform à chaque fois que j'appuis sur un bouton et si j'appuis encore
sur le mème bouton il me donne un autre label incrémenté.