[EXCEL] Affecte valeur d'une cellule
shp
Messages postés
15
Date d'inscription
Statut
Membre
Dernière intervention
-
shp Messages postés 15 Date d'inscription Statut Membre Dernière intervention -
shp Messages postés 15 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Y a-t-il une fonction Excel qui permette d’affecter la valeur d’une cellule à une autre cellule ?
Par exemple, je désire que faire c2 := d4, et ce en appliquant la formule =f(c2;d4) dans a1.
Merci de votre aide !
Cordialement,
shp
Y a-t-il une fonction Excel qui permette d’affecter la valeur d’une cellule à une autre cellule ?
Par exemple, je désire que faire c2 := d4, et ce en appliquant la formule =f(c2;d4) dans a1.
Merci de votre aide !
Cordialement,
shp
A voir également:
- [EXCEL] Affecte valeur d'une cellule
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
- Proteger cellule excel - Guide
- Aller à la ligne dans une cellule excel - Guide
- Déplacer une colonne excel - Guide
7 réponses
Merci pour les réponses.
Je ne vois pas comment traduire c2 := d4 depuis une formule se situant dans a1.
Merci encore de votre aide !
Cordialement,
shp
Je ne vois pas comment traduire c2 := d4 depuis une formule se situant dans a1.
Merci encore de votre aide !
Cordialement,
shp
Bonjour,
Je souhaite faire un mini-générateur de planning, c’est-à-dire lorsque je planifie une action a dans un créneau pour un formateur f sur le planning général P, si f est libre alors a est noté dans P et dans l’emploi du temps de f, sinon un message signalant que f est occupé et il faut que l’action saisie soit effacée.
C’est cette dernière instruction qui pose problème.
Voici le code que j’ai essayé :
Function FRecopie(Cel_edt, Cel_planning)
'Cel_edt : cellule de l'emploi du temps du formateur
'Cel_planning : cellule du planning général à générer
If Cel_edt = "" Then
'si le formateur est libre
Cel_edt = Cel_planning
'l'emploi du temps du formateur reçoit l'action prévue au planning général
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning = ""
'envoi d'une boîte de message puis effacement de l'action sur le planning général
End If
FRecopie = Cel_edt
End Function
3 anomalies :
- la MsgBox s’affiche 2 fois
- le contenu de Cel_planning ne s’efface pas
- la fonction retourne #VALEUR! dans la cellule où elle est appelée
Merci de m’indiquer les erreurs dans ce code.
Cordialement,
shp
Je souhaite faire un mini-générateur de planning, c’est-à-dire lorsque je planifie une action a dans un créneau pour un formateur f sur le planning général P, si f est libre alors a est noté dans P et dans l’emploi du temps de f, sinon un message signalant que f est occupé et il faut que l’action saisie soit effacée.
C’est cette dernière instruction qui pose problème.
Voici le code que j’ai essayé :
Function FRecopie(Cel_edt, Cel_planning)
'Cel_edt : cellule de l'emploi du temps du formateur
'Cel_planning : cellule du planning général à générer
If Cel_edt = "" Then
'si le formateur est libre
Cel_edt = Cel_planning
'l'emploi du temps du formateur reçoit l'action prévue au planning général
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning = ""
'envoi d'une boîte de message puis effacement de l'action sur le planning général
End If
FRecopie = Cel_edt
End Function
3 anomalies :
- la MsgBox s’affiche 2 fois
- le contenu de Cel_planning ne s’efface pas
- la fonction retourne #VALEUR! dans la cellule où elle est appelée
Merci de m’indiquer les erreurs dans ce code.
Cordialement,
shp
Salut,
1.) Il serait souhaitable de déclarer le type des variables
dans la définition.
Function FRecopie (Cel_edt As Range, Cel_Planning As Range)
2.) Si dans la dernière instruction tu fais :
FRecopie = Cel_edt
La déclaration devrait être :
Function FRecopie (Cel_edt As Range, Cel_Planning As Range) As Range
et l'instruction :
Set FRecopie = Cel_edt
Lupin
1.) Il serait souhaitable de déclarer le type des variables
dans la définition.
Function FRecopie (Cel_edt As Range, Cel_Planning As Range)
2.) Si dans la dernière instruction tu fais :
FRecopie = Cel_edt
La déclaration devrait être :
Function FRecopie (Cel_edt As Range, Cel_Planning As Range) As Range
et l'instruction :
Set FRecopie = Cel_edt
Lupin
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
re:
ici aussi ça coince :
If Cel_edt = "" Then
Cel_edt = Cel_planning
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning = ""
End If
devrait se lire comme suit :
If Cel_edt.Value = "" Then
Set Cel_edt = Cel_planning
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning.Value = ""
End If
Lupin
ici aussi ça coince :
If Cel_edt = "" Then
Cel_edt = Cel_planning
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning = ""
End If
devrait se lire comme suit :
If Cel_edt.Value = "" Then
Set Cel_edt = Cel_planning
Else
msg = MsgBox("F oqp !", vbCritical): Cel_planning.Value = ""
End If
Lupin
