Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonjour Sofien,
2 façons de faire :
Dim Rg As Range, R As Range
'Toute la plage Set Rg = Range("b15").CurrentRegion 'Seulement la colonne 3 de la plage Set R = Rg.Columns(3) 'OU Set R = Rg.Offset(, 2).Resize(, 1) 'copie la colonne vers G1 R.Copy Range("G1")
Salutations!
"Sofien Djelassi" a écrit dans le message de news:
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en VBA ?? -- Sofien
Bonjour Sofien,
2 façons de faire :
Dim Rg As Range, R As Range
'Toute la plage
Set Rg = Range("b15").CurrentRegion
'Seulement la colonne 3 de la plage
Set R = Rg.Columns(3)
'OU
Set R = Rg.Offset(, 2).Resize(, 1)
'copie la colonne vers G1
R.Copy Range("G1")
Salutations!
"Sofien Djelassi" <sofiendb@hotmail.com> a écrit dans le message de news:
A9B0B7E5-E8C8-43A4-8E69-E7ED196E0D4F@microsoft.com...
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en
VBA ??
--
Sofien
'Toute la plage Set Rg = Range("b15").CurrentRegion 'Seulement la colonne 3 de la plage Set R = Rg.Columns(3) 'OU Set R = Rg.Offset(, 2).Resize(, 1) 'copie la colonne vers G1 R.Copy Range("G1")
Salutations!
"Sofien Djelassi" a écrit dans le message de news:
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en VBA ?? -- Sofien
Sofien Djelassi
Merci Mich (un rapport avec baywatch??)
Ca marche super!!
Bonjour Sofien,
2 façons de faire :
Dim Rg As Range, R As Range
'Toute la plage Set Rg = Range("b15").CurrentRegion 'Seulement la colonne 3 de la plage Set R = Rg.Columns(3) 'OU Set R = Rg.Offset(, 2).Resize(, 1) 'copie la colonne vers G1 R.Copy Range("G1")
Salutations!
"Sofien Djelassi" a écrit dans le message de news:
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en VBA ?? -- Sofien
Merci Mich (un rapport avec baywatch??)
Ca marche super!!
Bonjour Sofien,
2 façons de faire :
Dim Rg As Range, R As Range
'Toute la plage
Set Rg = Range("b15").CurrentRegion
'Seulement la colonne 3 de la plage
Set R = Rg.Columns(3)
'OU
Set R = Rg.Offset(, 2).Resize(, 1)
'copie la colonne vers G1
R.Copy Range("G1")
Salutations!
"Sofien Djelassi" <sofiendb@hotmail.com> a écrit dans le message de news:
A9B0B7E5-E8C8-43A4-8E69-E7ED196E0D4F@microsoft.com...
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en
VBA ??
--
Sofien
'Toute la plage Set Rg = Range("b15").CurrentRegion 'Seulement la colonne 3 de la plage Set R = Rg.Columns(3) 'OU Set R = Rg.Offset(, 2).Resize(, 1) 'copie la colonne vers G1 R.Copy Range("G1")
Salutations!
"Sofien Djelassi" a écrit dans le message de news:
Bonjour,
Est-il possible de copier une colonne en particulier d'un currentregion en VBA ?? -- Sofien
