Copier - coller

Fermé

geoalice Messages postés 2 Date d'inscription mercredi 11 janvier 2017 Statut Membre Dernière intervention 14 janvier 2017 - 11 janv. 2017 à 19:03
geoalice Messages postés 2 Date d'inscription mercredi 11 janvier 2017 Statut Membre Dernière intervention 14 janvier 2017 - 14 janv. 2017 à 13:04

bonjour,
J'ai des checkbox que je veux copier dans une autre feuille si la valeur=true
toutefois, je suis incapable de le coller à la prochaine cellule vide à partir de E15

voici le code actuel - qui ne prend pas ma ligne 5
1-If CheckBox1 = True Then
2-ActiveSheet.Shapes.Range(Array("checkbox1")).Select
3-Selection.Copy
4-Sheets("Lettre Francais (2)").Select
5-Range("e15").End(xlDown).Offset(1, 0).Select
6-ActiveSheet.Paste
7-End If
8-End Sub

J,ai une liste de checkbox et dès qu'ils sont activés, ils doivent se reporter dans ma feuille nommée Lettre francaos 2 - toutefois, sans être activé (= false).

Merci à l'avance

A voir également:

Copier - coller
Copier coller pdf - Guide
Copier une vidéo youtube - Guide
Super copier - Télécharger - Gestion de fichiers
Dessin sms copier coller - Forum Jeux vidéo
Copier coller formule excel sans décalage ✓ - Forum Bureautique

1 réponse

Réponse 1 / 1

Frenchie83 Messages postés 2240 Date d'inscription lundi 6 mai 2013 Statut Membre Dernière intervention 11 août 2023 337
14 janv. 2017 à 04:29

Bonjour
La Cellule E15 est-elle toujours pleine? si ce n'est pas le cas il faut traiter cette condition pour forcer la copie dans la cellule[E15], par exemple:

    If CheckBox1 = True Then
    ActiveSheet.Shapes.Range(Array("checkbox1")).Select
    Selection.Copy
    Sheets("Lettre Francais (2)").Select
        If [E15] = "" Then
            [E15].Select
            ActiveSheet.Paste
        Else
            Range("e15").End(xlDown).Offset(1, 0).Select
            ActiveSheet.Paste
        End If
    End If

Cdlt

geoalice Messages postés 2 Date d'inscription mercredi 11 janvier 2017 Statut Membre Dernière intervention 14 janvier 2017
14 janv. 2017 à 13:04

Copier - coller

1 réponse

Discussions similaires

Newsletters