Exécuter les macros automatiquement

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

KaoutherM

XLDnaute Nouveau
Hello ,


J'utilise l'option sous Excel > centre de sécurité > Activer les macros automatiquement car mon client ne veut meme pas faire un click 🙂

le pb que cette fonction qui permet de remplir des champs ne s'exécute pas , il faut aller sur chaque champ Faire F2 pour afficher la valeur

Function GetParam(mysheet As String, myfield As String, mycol As String) As String

Dim Worksheet As Worksheet
Dim myRange As Range

GetParam = "-"
Set Worksheet = Sheets("C1")
Set myRange = Worksheet.UsedRange

For Each rw In myRange.Rows
If rw.Cells(1, 1).Value = myfield Then
If mycol = "Unit" Then
GetParam = rw.Cells(1, 2).Value
Else
If mycol = "AB" Then
GetParam = rw.Cells(1, 3).Value
Else
If mycol = "BA" Then
GetParam = rw.Cells(1, 4).Value
End If
End If
End If
End If
Next

End Function


y-a-t-il un moyen de rendre son exécution automatique ?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
179
Réponses
2
Affichages
154
Réponses
5
Affichages
232
Réponses
10
Affichages
281
Réponses
5
Affichages
183
Réponses
7
Affichages
212
Retour