Voici une macro fort simple, mais j'aimerais appliquer cette macro sur une
cellule que j'aurais rechercher auparavant par une petite macro recherche.
Sub effacer()
'
' effacer Macro
' Macro enregistrée le 13/07/2005 par Hc-DCS
'
'
Range("E33").Select
ActiveCell.FormulaR1C1 = "closed"
Range("H33").Select
ActiveCell.FormulaR1C1 = "closed"
Range("B33:J33").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B39").Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=-9
End Sub
Mon probleme est que dans le cas de cette macro, la cellule est déjà définie
(E33). Comment puis-je faire pour une cellule qui resultera d'une recherche
sur un document comprenant plus de 1000 lignes?
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
garnote
Salut julien,
Comment obtiens-tu le résultat de ta recherche ?
Serge
"julien CHARLES" a écrit dans le message de news:
Voici une macro fort simple, mais j'aimerais appliquer cette macro sur une cellule que j'aurais rechercher auparavant par une petite macro recherche.
Sub effacer() ' ' effacer Macro ' Macro enregistrée le 13/07/2005 par Hc-DCS '
' Range("E33").Select ActiveCell.FormulaR1C1 = "closed" Range("H33").Select ActiveCell.FormulaR1C1 = "closed" Range("B33:J33").Select Selection.Copy ActiveWindow.SmallScroll Down:=9 Range("B39").Select ActiveSheet.Paste ActiveWindow.SmallScroll Down:=-9 End Sub
Mon probleme est que dans le cas de cette macro, la cellule est déjà définie (E33). Comment puis-je faire pour une cellule qui resultera d'une recherche sur un document comprenant plus de 1000 lignes?
Merci
Salut julien,
Comment obtiens-tu le résultat de ta recherche ?
Serge
"julien CHARLES" <julienCHARLES@discussions.microsoft.com> a écrit dans le
message de news: 131BC8ED-B6C5-4238-9FEF-53AF96B7053E@microsoft.com...
Voici une macro fort simple, mais j'aimerais appliquer cette macro sur une
cellule que j'aurais rechercher auparavant par une petite macro recherche.
Sub effacer()
'
' effacer Macro
' Macro enregistrée le 13/07/2005 par Hc-DCS
'
'
Range("E33").Select
ActiveCell.FormulaR1C1 = "closed"
Range("H33").Select
ActiveCell.FormulaR1C1 = "closed"
Range("B33:J33").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=9
Range("B39").Select
ActiveSheet.Paste
ActiveWindow.SmallScroll Down:=-9
End Sub
Mon probleme est que dans le cas de cette macro, la cellule est déjà
définie
(E33). Comment puis-je faire pour une cellule qui resultera d'une
recherche
sur un document comprenant plus de 1000 lignes?
Voici une macro fort simple, mais j'aimerais appliquer cette macro sur une cellule que j'aurais rechercher auparavant par une petite macro recherche.
Sub effacer() ' ' effacer Macro ' Macro enregistrée le 13/07/2005 par Hc-DCS '
' Range("E33").Select ActiveCell.FormulaR1C1 = "closed" Range("H33").Select ActiveCell.FormulaR1C1 = "closed" Range("B33:J33").Select Selection.Copy ActiveWindow.SmallScroll Down:=9 Range("B39").Select ActiveSheet.Paste ActiveWindow.SmallScroll Down:=-9 End Sub
Mon probleme est que dans le cas de cette macro, la cellule est déjà définie (E33). Comment puis-je faire pour une cellule qui resultera d'une recherche sur un document comprenant plus de 1000 lignes?
