actualiser or not....

Le
Greg
Bonjour (ou re!)

J'ai un classeur avec des valeurs alétoires. F9 me permet de "rafraichir"
les cellules. Le problème, c'est que lorsque je saisis dans une cellule
quelconque de la feuille et que je valide, la même chose se produit.

Comment empécher cette deuxième cause, en conservant la possibilité
d'actualiser, par macro par exemple?

Merci à vous

Greg
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #20519601
Bonjour Greg,

Dans les cellules qui se mettent à jour "automatiquement" tu dois
avoir une fonction "volatile" built-in d'Excel.

Les fonctions volatiles built-in d'Excel sont :

Alea(), colonnes(), lignes(), maintenant(), aujourdhui(), zones()
Decaler(), Index(), Cellule(), Indirect().

Pour empêcher les cellules contenant une de ces fonctions de se
mettent à jour automatiquement, il faut passer en mode de calcul manuel.



"Greg"
Bonjour (ou re!)

J'ai un classeur avec des valeurs alétoires. F9 me permet de "rafraichir"
les cellules. Le problème, c'est que lorsque je saisis dans une cellule
quelconque de la feuille et que je valide, la même chose se produit.

Comment empécher cette deuxième cause, en conservant la possibilité
d'actualiser, par macro par exemple...?

Merci à vous

Greg
Greg
Le #20516401
Bonjour MichDenis,

Je suis passé en mode manuel par le menu "option" d'excel, ce qui représente
2 inconvénients:
- les utilisateurs devront faire la même chose avant d'utiliser mon fichier.
- les calculs ne se font plus automatiquement dans les cellules qui ne sont
pas concernées.

Est-il possible de commander le mode manuel sur des cellules ciblées, pour
un temps donné, avec une macro qui figerait ces cellules puis une autre qui
les débloquerait?

Merci

Greg

"michdenis" news:
Bonjour Greg,

Dans les cellules qui se mettent à jour "automatiquement" tu dois
avoir une fonction "volatile" built-in d'Excel.

Les fonctions volatiles built-in d'Excel sont :

Alea(), colonnes(), lignes(), maintenant(), aujourdhui(), zones()
Decaler(), Index(), Cellule(), Indirect().

Pour empêcher les cellules contenant une de ces fonctions de se
mettent à jour automatiquement, il faut passer en mode de calcul manuel.



"Greg" :

Bonjour (ou re!)

J'ai un classeur avec des valeurs alétoires. F9 me permet de "rafraichir"
les cellules. Le problème, c'est que lorsque je saisis dans une cellule
quelconque de la feuille et que je valide, la même chose se produit.

Comment empécher cette deuxième cause, en conservant la possibilité
d'actualiser, par macro par exemple...?

Merci à vous

Greg



Greg
Le #20516501
Voic pour mieux comprendre: http://cjoint.com/?liunxmtYEp

La colonne B masquée, le but du jeu est de trouver les réponses en colonne
C. Le problème, c'est qu'à chaque fois que je rentre une valeur et que je la
valide, les données des autres colonnes (victimes comme tu le disais
justement de la fonction ALEA) changent. Ce qui casse le boulot...


Voilà, j'espère que vous comprendrez mon souci.

à plus

Greg


"michdenis" news:
Bonjour Greg,

Dans les cellules qui se mettent à jour "automatiquement" tu dois
avoir une fonction "volatile" built-in d'Excel.

Les fonctions volatiles built-in d'Excel sont :

Alea(), colonnes(), lignes(), maintenant(), aujourdhui(), zones()
Decaler(), Index(), Cellule(), Indirect().

Pour empêcher les cellules contenant une de ces fonctions de se
mettent à jour automatiquement, il faut passer en mode de calcul manuel.



"Greg" :

Bonjour (ou re!)

J'ai un classeur avec des valeurs alétoires. F9 me permet de "rafraichir"
les cellules. Le problème, c'est que lorsque je saisis dans une cellule
quelconque de la feuille et que je valide, la même chose se produit.

Comment empécher cette deuxième cause, en conservant la possibilité
d'actualiser, par macro par exemple...?

Merci à vous

Greg



michdenis
Le #20520771
| La colonne B masquée, le but du jeu est de trouver les réponses en colonne
| C. Le problème, c'est qu'à chaque fois que je rentre une valeur et que je la
| valide, les données des autres colonnes (victimes comme tu le disais
| justement de la fonction ALEA) changent. Ce qui casse le boulot...

Dans quelle feuille de ton classeur retrouve-t-on la fonction "Alea()" dans
la colonne B ? Es-tu sûr d'avoir publié le bon classeur ?
Modeste
Le #20520841
Bonsour® michdenis avec ferveur ;o))) vous nous disiez :

La colonne B masquée, le but du jeu est de trouver les réponses en
colonne C. Le problème, c'est qu'à chaque fois que je rentre une
valeur et que je la valide, les données des autres colonnes
(victimes comme tu le disais justement de la fonction ALEA)
changent. Ce qui casse le boulot...



Dans quelle feuille de ton classeur retrouve-t-on la fonction
"Alea()" dans la colonne B ? Es-tu sûr d'avoir publié le bon classeur
?



tsss!!!! Denis...
feuille Evaluation, colonne D, Police blanche !!!

le soucis avec le DoEvents dans la boucle, on ne peut saisir beaucoup de caractéres dans la colonne C....
le DoEvents traite le tampon clavier !!!!
michdenis
Le #20520891
| tsss!!!! Denis...
| feuille Evaluation, colonne D, Police blanche !!!

Moi, j'ai ce type de formule en colonne D de la feuille évaluation :
=SI(C2²;"C";"L")

| le soucis avec le DoEvents dans la boucle, on ne peut saisir beaucoup de caractéres
|dans la colonne C.... le DoEvents traite le tampon clavier !!!

*** Je vais débuter par trouver les éléments la question ... d'acccord ?
;-)
Modeste
Le #20521141
Bonsour® michdenis avec ferveur ;o))) vous nous disiez :

tsss!!!! Denis...
feuille Evaluation, colonne D, Police blanche !!!




Oupsss......
FEUILLE QUESTIONNAIRE
michdenis
Le #20521621
Bonjour Modeste,

Dans son application, Greg pourrait utiliser ce bout de code
dans le module ThisWorkbook de son classeur :

S'il y a un autre problème avec la procédure en module1,
il faudra préciser sa nature. (Public Sub chrono())

'------------------------------------------
Private Sub Workbook_Activate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_Deactivate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Dim Rg As Range
Set Rg = Union(Range("A:C"), Range(Cells(1, Columns.Count), _
Cells(Rows.Count, Columns.Count)))

If UCase(Sh.CodeName) = "FEUIL1" Then
If Intersect(Target, Range("d:d")) Is Nothing Then
Rg.Calculate
End If
Else
Sh.Calculate
End If

End Sub
'------------------------------------------




"Modeste"
Bonsour® michdenis avec ferveur ;o))) vous nous disiez :

tsss!!!! Denis...
feuille Evaluation, colonne D, Police blanche !!!




Oupsss......
FEUILLE QUESTIONNAIRE
Greg
Le #20523141
Bonjour Modeste, bonjour Denis,

Je vois que vous avez travaillé pendant mon absence! Frédo également
puisqu'il m'a fait une proposition dans le post d'origine: "compte à rebours
et validation d'une cellule à 0" du 07/11 à 22h31.

Que dois-je faire selon vous? La proposition de Frédo fonctionne
correctement de mon point de vue. A chaque mise en route du compteur,
l'ordre des questions change, ce qui me va très bien. J'aimerais pouvoir
arrêter le compte à rebours si le questionnaire est terminé avant qu'il ne
soit arrivé à 0.

Ensuite, l'idée est que l'arrêt du compte à rebours (bouton "j'ai fini"), OU
que l'échéance 0 du compte à rebours génère automatiquement
- l'affichage de la colonne B (Bonnes réponses et score)
- la saisie de la date du jour et du score dans la feuille résultat

Doit-on (Peut-on?) ajouter des lignes de code dans la même macro?

Si vous répondez, pouvez vous le faire sur le post d'origine afin que l'info
puisse suivre?

Merci beaucoup pour votre aide précieuse!

Greg




"michdenis" news:%
Bonjour Modeste,

Dans son application, Greg pourrait utiliser ce bout de code
dans le module ThisWorkbook de son classeur :

S'il y a un autre problème avec la procédure en module1,
il faudra préciser sa nature. (Public Sub chrono())

'------------------------------------------
Private Sub Workbook_Activate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_Deactivate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Dim Rg As Range
Set Rg = Union(Range("A:C"), Range(Cells(1, Columns.Count), _
Cells(Rows.Count, Columns.Count)))

If UCase(Sh.CodeName) = "FEUIL1" Then
If Intersect(Target, Range("d:d")) Is Nothing Then
Rg.Calculate
End If
Else
Sh.Calculate
End If

End Sub
'------------------------------------------




"Modeste"
Bonsour® michdenis avec ferveur ;o))) vous nous disiez :

tsss!!!! Denis...
feuille Evaluation, colonne D, Police blanche !!!




Oupsss......
FEUILLE QUESTIONNAIRE




michdenis
Le #20524181
Voici ton fichier avec un bouton pour arrêter l'exécution du Chrono.
Le fichier contient aussi la macro qui te permet de saisir des données
sans la mise automatique des données dû à la fonction "Alea()"
au besoin, tu utilises la touche F9

http://cjoint.com/?ljvrWaj4ij



"Greg" #
Bonjour Modeste, bonjour Denis,

Je vois que vous avez travaillé pendant mon absence! Frédo également
puisqu'il m'a fait une proposition dans le post d'origine: "compte à rebours
et validation d'une cellule à 0" du 07/11 à 22h31.

Que dois-je faire selon vous? La proposition de Frédo fonctionne
correctement de mon point de vue. A chaque mise en route du compteur,
l'ordre des questions change, ce qui me va très bien. J'aimerais pouvoir
arrêter le compte à rebours si le questionnaire est terminé avant qu'il ne
soit arrivé à 0.

Ensuite, l'idée est que l'arrêt du compte à rebours (bouton "j'ai fini"), OU
que l'échéance 0 du compte à rebours génère automatiquement
- l'affichage de la colonne B (Bonnes réponses et score)
- la saisie de la date du jour et du score dans la feuille résultat

Doit-on (Peut-on?) ajouter des lignes de code dans la même macro?

Si vous répondez, pouvez vous le faire sur le post d'origine afin que l'info
puisse suivre?

Merci beaucoup pour votre aide précieuse!

Greg




"michdenis" news:%
Bonjour Modeste,

Dans son application, Greg pourrait utiliser ce bout de code
dans le module ThisWorkbook de son classeur :

S'il y a un autre problème avec la procédure en module1,
il faudra préciser sa nature. (Public Sub chrono())

'------------------------------------------
Private Sub Workbook_Activate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_Deactivate()
Application.Calculation = xlCalculationManual
End Sub
'------------------------------------------
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Dim Rg As Range
Set Rg = Union(Range("A:C"), Range(Cells(1, Columns.Count), _
Cells(Rows.Count, Columns.Count)))

If UCase(Sh.CodeName) = "FEUIL1" Then
If Intersect(Target, Range("d:d")) Is Nothing Then
Rg.Calculate
End If
Else
Sh.Calculate
End If

End Sub
'------------------------------------------




"Modeste"
Bonsour® michdenis avec ferveur ;o))) vous nous disiez :

tsss!!!! Denis...
feuille Evaluation, colonne D, Police blanche !!!




Oupsss......
FEUILLE QUESTIONNAIRE




Publicité
Poster une réponse
Anonyme