florent@77
XLDnaute Junior
bonjour à tous,
je souhaiterai selectionner d'une colonne en fonction de son intituler
j'ai adapter une macro de ce forum qui me permet de selectionner la premiere cellule en fonction d'un mot
Sub PROD1()
Sheets("RECUP").Activate
mot = Range("A2").Value
Sheets("PROD").Activate
Dim nbc As Integer, i As Integer
nbc = Range("IV1").End(xlToLeft).Column
For i = 1 To nbc
If Cells(1, i).Value = mot Then
Cells(1, i).Select '>selection cellule
'Columns(i).Select> selection colonne entiere
Exit For
End If
Next
End Sub
le problème sur lequel je butte , c'est comment selectionner les valeurs de ma colonne sans selectionner la colonne entiere qui me génère une erreur quand je fais un copier coller
merci d'avance
Florent
je souhaiterai selectionner d'une colonne en fonction de son intituler
j'ai adapter une macro de ce forum qui me permet de selectionner la premiere cellule en fonction d'un mot
Sub PROD1()
Sheets("RECUP").Activate
mot = Range("A2").Value
Sheets("PROD").Activate
Dim nbc As Integer, i As Integer
nbc = Range("IV1").End(xlToLeft).Column
For i = 1 To nbc
If Cells(1, i).Value = mot Then
Cells(1, i).Select '>selection cellule
'Columns(i).Select> selection colonne entiere
Exit For
End If
Next
End Sub
le problème sur lequel je butte , c'est comment selectionner les valeurs de ma colonne sans selectionner la colonne entiere qui me génère une erreur quand je fais un copier coller
merci d'avance
Florent