Problème sur VBA

Bonjour,

Je reviens vers vous suite à mon projet VBA.

J'aimerais pouvoir regarder si dans une colonne il y a une valeur alors afficher une fenêtre sinon sélectionner 2 colonnes autres et les copier/coller dans une autre feuille

J'ai déjà réalisé ce code mais il ne marche pas et je ne sais pas comment procéder pour le sinon

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub CommandButton1_Click()   fin_bdd = Worksheets("bdd").Range("A3000").End(xlUp).Row   If Worksheets("bdd").Range("D2:"D & fin_bdd") <> "" Then Heure_rattraper.Show   End If Worksheets("bdd").range("A2":"B" & fin_bdd").copy Worksheets("planning").Range(A2).Paste     'MsgBox fin_bdd   End Sub

---

Merci d'avance.

Regarde la position de tes guillemets dans cette partie de code : Range("D2:"D & fin_bdd").
Le second est mal placé et le troisième est en trop.

Merci et pour savoir si la cellule est vide c'est bien comme ça qu'il faut l'écrire ou pas ?

Code:

---

1 2

<> ""

---