Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

fonction si en VBA avec lien sur autre feuille

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Yopub
  • Date de début Date de début

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 !

S'inscrire
Y

Yopub

XLDnaute Junior
Bonjour, pardonnez le novice en VBA que je suis, mais je bute depuis un bon moment sur un problème, probablement minime.
Je cherche à écrire dans une macro, la fonction SI dans une cellule d'une feuille, faisant référence à une cellule d'une autre feuille dont le nom est introduit par une inputbox.
Actuellement j'en suis à :
Range("D3").Select 'de la feuille active clairement identifiée
ActiveCell.FormulaR1C1 = _
"=IF(NomAgent!R[23]C[-2]=FALSE,""Horaire"",""Mensualité"")"

La feuille "volatile" s'appelle "NomAgent". Cette variable est bien reconnue puisque, plus loin dans la macro, je m'en sert et cela fonctionne.
Il doit y avoir une écriture spécifique pour expliquer où je veux trouver la cellule référente. Du style "Sheets(NomAgent).Cells(26,2)!"
Y a t il une bonne âme pour faire baisser mon taux d'énervement actuel ?
Par avance merci
 
Trier par date Trier par votes
Re : fonction si en VBA avec lien sur autre feuille

Bonjour Yopub et bienvenu, bonjour le forum,

Je te propose le code ci-dessous à adapter :
Code: 
Sub Macro1()
Dim a As String 'déclare la variable a
 
debut: 'étiquette
a = InputBox("Tapez le nom de l'onglet", "ONGLET") 'définit la variable a
If a = "" Then Exit Sub 'si pas renseigné ou bouton "Annuler", sort de la procédure
On Error Resume Next 'si une erreur se produit, passe à la ligne suivante
With Sheets(a) 'prend en compte l'onglet renseigné (provoque une erreur si cet onglet n'existe pas)
    If Err > 0 Then 'condition : si une erreur est provoquée
        MsgBox "l'onglet spécifié n'existe pas ! Retapez le nom de l'onglet." 'message
        GoTo debut 'retourne à la boîte d'entrée
    End If 'fin de la condition
    On Error GoTo 0 'annule la gestion des erreurs
    'place "Horaire" dans la cellule C3 de l'onglet actif si la cellule B26 de l'onglet renseigné est "FAUX"
    'place "Mensualité" dans la cellule C3 de l'onglet actif si la cellule B26 de l'onglet renseigné n'est pas "FAUX"
    ActiveSheet.Range("D3").Value = IIf(.Cells(26, 2).Value = False, "Horaire", "Mensualité")
End With 'fin de la prise en compte de l'onglet renseigné
End Sub
 
Vote positif 0 Vote négatif
Re : fonction si en VBA avec lien sur autre feuille

Bonjour le forum et merci pour les 2 réponses Robert et pierrejean. Pardon d'avoir tardé à me signaler, mais je croyais que ce site renvoyait sur ma messagerie une alerte de réponse. Novice, je vous dis!
Je prend bonne note de ces 2 propositions et les teste d'ici demain. Je vous recontacte après, pour vous donner le résultat des courses.
A bientôt
 
Vote positif 0 Vote négatif
Re : fonction si en VBA avec lien sur autre feuille

🙂
Bonjour à toutes et à tous, messieurs je viens de consulter attentivement vos 2 propositions. Celle de pierrejean colle parfaitement à ma requête. La subtilité "d'écrire" la formule dans la cellule au lieu de calculer sous VBA la réponse, je l'avais trouvé dans un forum. Je l'ai même appliquée dans la suite de la macro. Mais pour cette ligne ci, cela ne marchait pas. Maintenant si. VBA doit reconnaître la patte de l'expert et pas celle du débutant !
Cela dit, la version de Robert m'intéresse aussi car elle a l'avantage de partir de la inputbox et d'envisager tous les cas de figure. Cela risque de me servir plus tard.
Au passage, il m'est arrivé de tomber sur une "erreur 40036".
Cela a bloqué sur le pas suivant :
ActiveSheet.Unprotect
Y-a pas plus simple ! Hier cela fonctionnait parfaitement, et plus maintenant!
Je l'ai effacé, je l'ai réécrit : rien...
Je l'ai de nouveau effacé et je suis bêtement passé par l'enregistreur de macro : toujours la même erreur !
Il y a quelques jours, je suis tombé sur la cette erreur, mais sur un autre pas de programme. Le simple fait de fermer le fichier, de le réouvrir, et tout fonctionnait normalement.
D'après quelques sites faisant références à l'erreur 40036, j'ai l'impression que cela relève plus du bug que d'une véritable erreur.
Avez-vous des pistes en la matière ?
A bientôt
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

P
  • Question Question
XL 2021 Ajout/adaptation de code VBA sur feuille qui en contient déjà
Réponses
3
Affichages
170
Pierreavecunp
P
C
  • Résolu(e)
Microsoft 365 remplir une cellule en fonction d'une autre cellule sur un onglet différent
Réponses
9
Affichages
1 K
Céline49
C
A
  • Question Question
XL 2016 Copier certaines cellules de plusieurs ou d'une ligne(s) d'un tableau sur autre feuille
Réponses
11
Affichages
940
job75
  • Question Question
Microsoft 365 VBA Boucle 2 critères plage sur autre feuille
Réponses
5
Affichages
1 K
herve62
K
  • Question Question
XL pour MAC Copier coller les pages de feuilles différentes en fonction de mots clés, à la suite sur une même pages pour impression
Réponses
4
Affichages
821
Deadpool_CC
C
  • Résolu(e)
Microsoft 365 Identifier une cellule dans une colonne en fonction d'un numéro identifier dans une autre cellule avec VBA
Réponses
2
Affichages
1 K
Carine35
C
O
  • Résolu(e)
XL 2010 Après avoir fait un aperçu d'une feuille, je souhaiterai en fermant l'aperçu aller sur une autre feuille.
Réponses
3
Affichages
831
Bernard_XLD
C
  • Résolu(e)
XL 2016 VBA -copier/coller une plage sur une autre feuille
2
Réponses
22
Affichages
9 K
tikazor
T
N
  • Question Question
Microsoft 365 Renvoi vers autre cellule selon son résultat - en cliquant sur le lien
Réponses
1
Affichages
939
Nova-V
N
  • Question Question
XL 2016 Masquer des lignes si la cellule x se trouvant sur une autre feuille contient y
2
Réponses
15
Affichages
4 K
Hasco
  • Question Question
vba copier ligne avec image dans autre feuille et conserver Hauteur
Réponses
7
Affichages
4 K
herve62
  • Question Question
VBA Nombre de lignes avec ref en lien avec ligne active
Réponses
11
Affichages
1 K
chris6999
M
  • Question Question
XL 2013 (VBA) Modifier mise en forme d'une cellule d'une autre feuille
Réponses
0
Affichages
880
mestrod
M
F
  • Question Question
XL 2010 Copier le texte de plusieurs cellules sur une autre feuille avec critère
Réponses
2
Affichages
1 K
frelon444
F
  • Question Question
XL 2013 Formule SI avec données d'une autre feuille
Réponses
5
Affichages
6 K
st007
S
D
  • Question Question
Récupérer des cellules triées et les concatéiner dans une cellule d'une autre feuille en vba
Réponses
0
Affichages
965
Débutant72
D
A
  • Question Question
Recherche de valeur et incrémentation de cellule sur une autre feuille
Réponses
9
Affichages
2 K
Angeoun
A
G
  • Question Question
Bouton qui en fonction d'une cellule recherche même valeur sur autre feuille et color
Réponses
7
Affichages
1 K
Guigui03
G
U
  • Question Question
XL 2013 Créer des fichiers CSV en fonction du liste de variables d'une feuille excel
Réponses
2
Affichages
1 K
sylvanu
  • Question Question
copier une plage de cellules vers une autre avec variable en VBA
Réponses
2
Affichages
816
superbog
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…