VBA excel Copie valeur cellule avc condition

Résolu/Fermé

Tintin - 27 mars 2008 à 11:22
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 27 mars 2008 à 12:24

Bonjour,

J'aurai besoin de votre aide pour un code VBA (je débute) sur excel 2003.

je vous explique :

j'ai un tableau avec différents types de données dans chaque colonne

colonne A = Code catégorie

colonne B ......

colonne D = Type activité (toujours valeur 1 ou 4)

je voudrai un code qui fasse une recherche sur la colonne D, et que si la valeur 4 est trouvée dans une cellule (par ex en D56), la cellule correspondante dans la mm ligne en colonne A (ex A56) prenne la valeur de la cellule du dessus (soit A55).

j'espère être compréhensible et attend vos réponses avec impatience.

d'avance merci. (urgent)

A voir également:

VBA excel Copie valeur cellule avc condition
Excel cellule couleur si condition texte - Guide
Liste déroulante excel - Guide
Aller à la ligne dans une cellule excel - Guide
Verrouiller cellule excel - Guide
Copie cachée - Guide

2 réponses

Réponse 1 / 2

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mars 2008 à 11:56

bonjour

Ouvres l'éditeur Visual Basic (Alt+F11). Ajoutes un module (Insertions -> Module) et colles le code dedans :

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 27/03/2008 par Polux31
'
' Touche de raccourci du clavier: Ctrl+Maj+W
'

Dim i As Long

i = 2
While Range("D" & i).Value <> ""
    If Range("D" & i).Value = 4 Then
        Range("A" & i).Value = Range("A" & i - 1).Value
    End If
    i = i + 1
Wend
    
End Sub

Ensuite tu fais Ctrl+Maj+w pour lancer la macro

;o)

polux

Tintin
27 mars 2008 à 12:19

bonjour polux31,

et un grand MERCI!!!

ça fonctionne parfaitement c'est super!

merci pour la rapidité aussi!

a bientôt ;-)

Réponse 2 / 2

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mars 2008 à 12:24

De rien, content que ça règle ton blème

;o)

polux

Discussions similaires

Excel : colorer une cellule sous condition d'une autre ?

Formule Excel : "SI" une cellule contient un mot, alors ?

Changer la couleur d'une cellule selon son texte

Discussions similaires

Newsletters