Fonction _Excel_RangeReplace

Trouve et remplace des concordances de cha�nes dans une plage ou une feuille de calcul

#include <Excel.au3>
_Excel_RangeReplace ( $oWorkbook, $vWorksheet, $vRange, $sSearch, $sReplace [, $iLookAt = $xlPart [, $bMatchcase = False]] )

Param�tres

Valeur de retour

En relation

Exemples

Exemple 1

#include <Excel.au3>
#include <MsgBoxConstants.au3>

; Cr�e un objet Excel et ouvre un classeur
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xls")
If @error Then
    MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple", "Erreur lors de l'ouverture du classeur '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

; *****************************************************************************
; Remplace le contenu de la cellule A1 par une autre valeur
; *****************************************************************************
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 1", "Pressez OK pour modifier la cellule 'A1'.")
_Excel_RangeReplace($oWorkbook, Default, "A1", 1, 3.37)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 1", "Erreur lors du remplacement dans la plage." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 1", "Donn�e remplac�e avec succ�s dans la cellule 'A1'.")

Exemple 2

#include <Excel.au3>
#include <MsgBoxConstants.au3>

; Cr�e un objet Excel et ouvre un classeur exemple
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple", "Erreur lors de la cr�ation de l'objet Excel." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xls")
If @error Then
    MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple", "Erreur lors de l'ouverture du classeur '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

; *****************************************************************************
; Trouve toutes les cellules avec le texte "long " et le supprime (le remplace par "")
; *****************************************************************************
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 1", "Pressez OK pour modifier la cellule 'G1'.")
_Excel_RangeReplace($oWorkbook, Default, Default, "long ", "")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 2", "Erreur lors du remplacement de la donn�e." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "UDF Excel: _Excel_RangeReplace-Exemple 2", "Supprime le texte 'long '." & @CRLF & "Donn�e remplac�e avec succ�s.")

Succ�s:	Retourne l'objet plage et d�finit @extended � 1 si les cellules ont �t� modifi�es.
�chec:	Retourne 0 et d�finit @error <> 0.
@error:	1 - $oWorkbook n'est pas un objet ou n'est pas un objet classeur 2 - Le nom ou l'index $vWorksheet n'est pas valide ou $vWorksheet n'est pas un objet feuille de calcul. @extended contient le code d'erreur COM 3 - $sSearch est vide 4 - $vRange n'est pas valide. @extended contient le code d'erreur COM 5 - Erreur renvoy�e par la m�thode Replace. @extended contient le code d'erreur COM

$oWorkbook	Objet classeur Excel
$vWorksheet	Nom, index ou objet feuille de calcul � rechercher. Si la valeur est le mot-cl� Default, la feuille active sera utilis�e
$vRange	L'objet plage, la plage au format $xlA1 ou le mot-cl� Default pour rechercher dans toutes les cellules de la feuille de calcul sp�cifi�e
$sSearch	Cha�ne � rechercher
$sReplace	Cha�ne de remplacement
$iLookAt	[optionnel] Indique si le texte de recherche doit correspondre � l'ensemble ou � une partie. Peut �tre toute valeur de l'�num�ration XLLookAt (par d�faut = $xlPart)
$bMatchcase	[optionnel] True = sensible � la casse, Faux = insensible � la casse (par d�faut = False)