Ajouter une fonction dans Macro VBA
Résolu/Fermé
Ludivine
-
17 oct. 2012 à 13:13
jlnch Messages postés 8 Date d'inscription vendredi 22 juin 2012 Statut Membre Dernière intervention 10 mars 2015 - 18 oct. 2012 à 09:36
jlnch Messages postés 8 Date d'inscription vendredi 22 juin 2012 Statut Membre Dernière intervention 10 mars 2015 - 18 oct. 2012 à 09:36
A voir également:
- Ajouter une fonction dans Macro VBA
- Fonction si et - Guide
- Macro word - Guide
- Ajouter une adresse mail - Guide
- Macro logiciel - Télécharger - Organisation
- Ajouter un profil netflix payant - Guide
5 réponses
jlnch
Messages postés
8
Date d'inscription
vendredi 22 juin 2012
Statut
Membre
Dernière intervention
10 mars 2015
17 oct. 2012 à 13:38
17 oct. 2012 à 13:38
Salut,
par exemple,
Bien à toi.
Julien
par exemple,
Dim a As String Dim x As Integer a = Range("B2").Value x = InStr(1, a, "del") If x > 0 Then Range("J1").Value = "Delivery" Else Range("J1").Value = "Collect" End If
Bien à toi.
Julien
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
17 oct. 2012 à 14:11
17 oct. 2012 à 14:11
bonjour
Ne serait ce pas plutôt J2 que J1 (tu y as écris une formule)
autre manière
Ne serait ce pas plutôt J2 que J1 (tu y as écris une formule)
autre manière
Range("J2") = IIf(InStr(Range("B2").Value, "del"), "delivery", "collect")
Bonjour et merci à vous 2 !!
C'est bien en J1 car la formule que j'avais faite ne me convient pas et je veux la remplacer par une de vos propositions !!
Je test ça tout de suite !!
Merci beaucoup, je vous tiens au courant ;)
C'est bien en J1 car la formule que j'avais faite ne me convient pas et je veux la remplacer par une de vos propositions !!
Je test ça tout de suite !!
Merci beaucoup, je vous tiens au courant ;)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
jlnch
Messages postés
8
Date d'inscription
vendredi 22 juin 2012
Statut
Membre
Dernière intervention
10 mars 2015
18 oct. 2012 à 09:36
18 oct. 2012 à 09:36
Avec plaisir ;-)