copier cellule excel avec condition et macro

JBARBE

XLDnaute Barbatruc

• 13 Juin 2013

• #2

Re : copier cellule excel avec condition et macro

Bonjour à tous,

Les cellules dans les colonnes F - G - H ne sont pas spécifiées

 

Vote positif 0 Vote négatif

E

esthetique

Guest

• 13 Juin 2013

• #3

Re : copier cellule excel avec condition et macro

Voilà

Copier une cellule (B5) d’ une feuille A dans une feuille B, avec un macro et la condition suivant.

Si dans la feuille A, la cellule (A2) est égale à 1, la cellule B5 doit être copie dans la colonne F (Cellule F2), si A2 =2 dans la colonne G (Cellule G2) et si A3=3 dans la colonne H (Cellule H2).

 

Vote positif 0 Vote négatif

JBARBE

XLDnaute Barbatruc

• 13 Juin 2013

• #4

Re : copier cellule excel avec condition et macro

Peut-être ceci :

Code:

Option Explicit

Sub essai()
 If Sheets("A").Range("A2") = 1 Then
 Sheets("A").Range("B5").Copy Sheets("B").Range("F2")
 ElseIf Sheets("A").Range("A2") = 2 Then
 Sheets("A").Range("B5").Copy Sheets("B").Range("G2")
 ElseIf Sheets("A").Range("A2") = 3 Then
 Sheets("A").Range("B5").Copy Sheets("B").Range("H2")
 End If
End Sub

A NOTER que j'ai mis range A2 = 3 au lieu de range A3 = 3

 

Vote positif 0 Vote négatif

E

esthetique

Guest

• 13 Juin 2013

• #5

Re : copier cellule excel avec condition et macro

super....Merci

 

Vote positif 0 Vote négatif