Petit Pb VBA

[smileyben]

Bonjour tout le monde,
une petite question je cherche à introduire une fonction "Match" dans du VBA et lui attribuer une valeur pour ensuite la réutiliser dans une recherche de cellule mais le code suivant doit avoir une erreur :
Sub Macro4()
'
' Macro4 Macro
' Macro grabada el 16/08/2006 por Ai

Sheets("Hoja2").Select
ActiveCell.FormulaR1C1 = "b =MATCH(R[-10]C,coursebase)"

Cells(b, 2).Select
Selection.Insert Shift:=xlToRight


Cells(14, 5).Select
Selection.Copy
Cells(b, 2).Select
ActiveSheet.Paste



End Sub

Merci Beuacoup!!

 

[Gorfael]

Re : Petit Pb VBA

Bonjour tout le monde,
une petite question je cherche à introduire une fonction "Match" dans du VBA et lui attribuer une valeur pour ensuite la réutiliser dans une recherche de cellule mais le code suivant doit avoir une erreur :
Sub Macro4()
'
' Macro4 Macro
' Macro grabada el 16/08/2006 por Ai

Sheets("Hoja2").Select
ActiveCell.FormulaR1C1 = "b =MATCH(R[-10]C,coursebase)"

Cells(b, 2).Select
Selection.Insert Shift:=xlToRight


Cells(14, 5).Select
Selection.Copy
Cells(b, 2).Select
ActiveSheet.Paste



End Sub

Merci Beuacoup!!

Salut
C'est quoi une fonction MATCH ?
Je connais la propriété NoMatch qui passe à true en cas de réponse négative à une méthode Find, mais pas de fonction Match dans l'aide (Excel ou VBA)
A+

 

[Kobaya]

Re : Petit Pb VBA

salut smileyben,

heu...

tu veux attribuer une valeur à la fonction Match() ???

veux-tu stocker dans une variable le résultat de cette fonction ?

dans ce cas,ça donnerait quelquechose comme ça :
dblValeur = Application.WorksheetFunction.Match(Cells(10, 2), Range("coursebase"), 1)

donne plus de précision, voir même un fichier exemple de ce que tu veux faire.

Edit :
pour Gorfael,

Match() est l'équivalent de Equiv() dans la version anglaise.