copier coller

[cg1980]

bonjour,
j ai une pettite question

j-aimerais faire automatiquement la chose suivante.

je voudrais copier les mots en sheet 1 qui contiennent corp et les coller ne sheet 2 en transpos;
merci

 

[Manu62]

Re : copier coller

Bonjour

tu vas trouver ton bonheur ici : Formation Excel VBA JB

A+

Manu

 

[cg1980]

Re : copier coller

pardon mais je vois pas ce aue je cherche

 

[Manu62]

Re : copier coller

Bonjour,

Dans l'option Matricielle.

Manu

 

[cg1980]

Re : copier coller

hmmm honnetement je vois pas, mais bon...

 

[fhoest]

Re : copier coller

Bonjour a tous.
Voir pour mettre le code dans le vba suivant:

Option Compare Text

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For Each Target In Range("a1", Cells(UsedRange.Rows.Count, UsedRange.Columns.Count))
If Target Like "*" & "Corp" & "*" Then
Sheets("Sheet2").Cells(Target.Row, Target.Column) = Target.Text
Else: Sheets("Sheet2").Cells(Target.Row, Target.Column) = ""
End If
Next
End Sub

A bientôt.

 

[cg1980]

Re : copier coller

merci fhoest pour ton aide. tu m as donne un bon coup de main