Fonction FIND en VBA et Offset

Fermé
MC's Assigned geek - 4 août 2009 à 00:24
 MC's Assigned geek - 5 août 2009 à 01:58
Bonjour,

Je cherche actuellement à faire en sorte qu'une Macro VBA sous excel parte de la case active du premier classeur nomé X:
- qu'il cherche la date qui est à gauche de la cellule active (classeur X) dans le deuxième classeur nomé Y
- puis qu'il prenne une valeur dans une colonne a droite de la date (classeur Y)
-enfin enregistrer range("DBA0").value= valeur trouver.

D'avance merci beaucoup si vous arrivez à m'aider...

Mc's a Gk

2 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 757
4 août 2009 à 10:03
Salut,
C'est quoi au juste ton Range("DBA0")?????
Sinon pour le reste :

Dim col As String, lign As String, var1 As String, var2 As String
col = ActiveCell.Column
lign = ActiveCell.Row
With Sheets("Feuil2")
var1 = .Cells(lign, col - 1).Value
var2 = .Cells(lign, col + 1).Value
End With
Range("DBA0").value = var1 & " " & var2

1
MC's Assigned geek
5 août 2009 à 01:58
Merci beaucou^p pour cette réponse.

Le DBA0 est en faite une variable... donc au lieu de range("DBA0").value = c'est juste DBA0 = si je ne me trompe pas?

(re) Merci beaucoup,

Mc's Gk
0