bons calculs
Igor
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de
news:um74CXtn...@TK2MSFTNGP02.phx.gbl...
Le nombre en A1
=A1^(1/3)
--
Salutations
JJ
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
um74CXtn...@TK2MSFTNGP02.phx.gbl...
"Jacky" <Dup...@marcel.fr> a �crit dans le message de news:
ed8ijltn...@TK2MSFTNGP04.phx.gbl...
Serge
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
uxpFLxtn...@TK2MSFTNGP02.phx.gbl...
"Tatanka" <garnote...@videotron.ca> a �crit dans le message de news:
%23RAKaCu...@TK2MSFTNGP02.phx.gbl...
=ARRONDI((C2^2/9)^(1/3);0)
Voir aussi l'aide de "arrondi"
* Arrondit un nombre au nombre de chiffres indiqu�.
* Si no_chiffres est �gal � 0, nombre est arrondi au nombre entier le plus
proche.
--
Salutations
JJ
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
edH07Fyn...@TK2MSFTNGP05.phx.gbl...
"Jacky" <Dup...@marcel.fr> a �crit dans le message de news:
eAxFjdyn...@TK2MSFTNGP05.phx.gbl...
> Est-il possible de calculer la racine cubique d'un nombre ?
, avec v, vitesse du vent en km/h.
=ENT(((A1^2)/9)^(1/3)+0,5)
;o)))
http://www.cijoint.fr/cjlink.php?file=cj201001/cij6FoPff0.xls
>>> Comment arrondir ce nombre au plus près de l'entier le plus proche
>>> (A2=12.9) ?
>>> =(C2^2/9)^(1/3)<>ARRONDI(A2;1) ça ne fonctionne pas cela me donne
>>> "VRAI", la réponse est 2.6, il me faudrai 3.
>>>>> Donc, maintenant, il faut que je trouve en A30 la racine cubique
>>>>> du carré de A2 au carré /9.
>>>>> =((A2*A2)/9)^(1/3)
;o)))
BEAUFORT = entier le plus proche de la Racine cubique du (carré de la vitesse divisé par 9)
v, vitesse du vent en km/h.
=ENT(((A1^2)/9)^(1/3)+0,5)
))
http://www.cijoint.fr/cjlink.php?file=cj201001/cij6FoPff0.xls
"Modeste" <g...@libre.fr> a �crit dans le message de news:
%23d5no60...@TK2MSFTNGP04.phx.gbl...
Bonsour� Guy85 avec ferveur ;o))) vous nous disiez :
>>> Comment arrondir ce nombre au plus pr�s de l'entier le plus proche
>>> (A2=12.9) ?
>>> =(C2^2/9)^(1/3)<>ARRONDI(A2;1) �a ne fonctionne pas cela me donne
>>> "VRAI", la r�ponse est 2.6, il me faudrai 3.
>>>>> Donc, maintenant, il faut que je trouve en A30 la racine cubique
>>>>> du carr� de A2 au carr� /9.
>>>>> =((A2*A2)/9)^(1/3)
;o)))
BEAUFORT = entier le plus proche de la Racine cubique du (carr� de la
vitesse divis� par 9)
Bizz! J'ai essay� la boussole de Modeste et
j'ai des valeurs en C7, A3, D7 et E7.
Bon vent,
Serge
XL 2007
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
OZam4z1n...@TK2MSFTNGP02.phx.gbl...
Dans ton module feuille, tu devrais ajouter ces
quelques lignes de code pour un affichage
toute en souplesse ! ;-))
Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub
"Modeste" <g...@libre.fr> a �crit dans le message de groupe de discussion :
#d5no60n...@TK2MSFTNGP04.phx.gbl...
Bonsour� Guy85 avec ferveur ;o))) vous nous disiez :
>>> Comment arrondir ce nombre au plus pr�s de l'entier le plus proche
>>> (A2=12.9) ?
>>> =(C2^2/9)^(1/3)<>ARRONDI(A2;1) �a ne fonctionne pas cela me donne
>>> "VRAI", la r�ponse est 2.6, il me faudrai 3.
>>>>> Donc, maintenant, il faut que je trouve en A30 la racine cubique
>>>>> du carr� de A2 au carr� /9.
>>>>> =((A2*A2)/9)^(1/3)
;o)))
BEAUFORT = entier le plus proche de la Racine cubique du (carr� de la vitesse divis� par
> Dans ton module feuille, tu devrais ajouter ces
> quelques lignes de code pour un affichage
> toute en souplesse ! ;-))
>
> Private Sub ScrollBar1_Scroll()
> ScrollBar1_Change
> End Sub
tu as tout a fait raison!!!!
en fait il s'agit de :
Private Sub ScrollBar1_Change()
ActiveSheet.Shapes("WIND").Rotation = [vent] - 90
DoEvents
End Sub
j'ai du merdoyer grave dans le choix du fichier cijoint.fr
voilà une version correcte !!!
http://www.cijoint.fr/cjlink.php?file=cj201001/cijGt6y2uc.xls
En fait, ces quelques lignes de code font en sorte que
lors du d�placement du "machin" (en tenant le bouton
de la souris enfonc�) sur la barre de d�filement, la fl�che
se d�place simultan�ment au lieu d'attendre la fin du
d�placement.
Ce n'est qu'un d�tail !
;-)
"Modeste" <g...@libre.fr> a �crit dans le message de news:
%23A1rqw2...@TK2MSFTNGP05.phx.gbl...
Bonsour� michdenis avec ferveur ;o))) vous nous disiez :
> Dans ton module feuille, tu devrais ajouter ces
> quelques lignes de code pour un affichage
> toute en souplesse ! ;-))
>
> Private Sub ScrollBar1_Scroll()
> ScrollBar1_Change
> End Sub
tu as tout a fait raison!!!!
en fait il s'agit de :
Private Sub ScrollBar1_Change()
ActiveSheet.Shapes("WIND").Rotation = [vent] - 90
DoEvents
End Sub
j'ai du merdoyer grave dans le choix du fichier cijoint.fr
voil� une version correcte !!!
http://www.cijoint.fr/cjlink.php?file=cj201001/cijGt6y2uc.xls
Peut-�tre :
Outils / Macros compl�mentaires :
Coche � Utilitaire d'analyse �.
Serge
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
%23WCwsJ4...@TK2MSFTNGP06.phx.gbl...
"Tatanka" <garnote...@videotron.ca> a ïŋ―crit dans le message de news:
erhcsR4n...@TK2MSFTNGP05.phx.gbl...
>
> Salut Guy,
>
> Peut-ïŋ―tre :
> Outils / Macros complïŋ―mentaires :
> Coche ïŋ― Utilitaire d'analyse ïŋ―.
>
> Serge
>
> "Guy85" <Guy_Exc...@bonjour.fr> a ïŋ―crit dans le message de news:
> %23WCwsJ4...@TK2MSFTNGP06.phx.gbl...
>> Je n'ai toujours rien.
>> En A3,C7,D7,E7,..j'ai #NOM?
>>
>> "Modeste" <g...@libre.fr> a ïŋ―crit dans le message de news:
>> %23A1rqw2...@TK2MSFTNGP05.phx.gbl...
>> Bonsourïŋ― michdenis avec ferveur ;o))) vous nous disiez :
>>
>>> Dans ton module feuille, tu devrais ajouter ces
>>> quelques lignes de code pour un affichage
>>> toute en souplesse ! ;-))
>>>
>>> Private Sub ScrollBar1_Scroll()
>>> ScrollBar1_Change
>>> End Sub
>>
>>
>>
>> tu as tout a fait raison!!!!
>> en fait il s'agit de :
>>
>> Private Sub ScrollBar1_Change()
>> ActiveSheet.Shapes("WIND").Rotation = [vent] - 90
>> DoEvents
>> End Sub
>>
>>
>> j'ai du merdoyer grave dans le choix du fichier cijoint.fr
>>
>> voilïŋ― une version correcte !!!
>> http://www.cijoint.fr/cjlink.php?file=cj201001/cijGt6y2uc.xls
>>
>
>
� Ecrit par Caetera le jeudi 22 octobre 2009
On me dit qu'il y a 65 fonctions suppl�mentaires lorsqu'on active
l'utilitaire d'analyse parmi les macros compl�mentaires .........
Jusqu'� XL2003 au moins 94...
http://www.cijoint.fr/cjlink.php?file=cj200910/cijUoRN5Ty.xls
Etc �.
Serge
"Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
uK9wOi4n...@TK2MSFTNGP06.phx.gbl...
> Bonjour Tatanka,
> C'et bon, �a fonctionne.
> Merci de ta r�ponse
> Cordialement
> Guy
>
> "Tatanka" <garnote...@videotron.ca> a �crit dans le message de news:
> erhcsR4n...@TK2MSFTNGP05.phx.gbl...
>>
>> Salut Guy,
>>
>> Peut-�tre :
>> Outils / Macros compl�mentaires :
>> Coche � Utilitaire d'analyse �.
>>
>> Serge
>>
>> "Guy85" <Guy_Exc...@bonjour.fr> a �crit dans le message de news:
>> %23WCwsJ4...@TK2MSFTNGP06.phx.gbl...
>>> Je n'ai toujours rien.
>>> En A3,C7,D7,E7,..j'ai #NOM?
>>>
>>> "Modeste" <g...@libre.fr> a �crit dans le message de news:
>>> %23A1rqw2...@TK2MSFTNGP05.phx.gbl...
>>> Bonsour� michdenis avec ferveur ;o))) vous nous disiez :
>>>
>>>> Dans ton module feuille, tu devrais ajouter ces
>>>> quelques lignes de code pour un affichage
>>>> toute en souplesse ! ;-))
>>>>
>>>> Private Sub ScrollBar1_Scroll()
>>>> ScrollBar1_Change
>>>> End Sub
>>>
>>>
>>>
>>> tu as tout a fait raison!!!!
>>> en fait il s'agit de :
>>>
>>> Private Sub ScrollBar1_Change()
>>> ActiveSheet.Shapes("WIND").Rotation = [vent] - 90
>>> DoEvents
>>> End Sub
>>>
>>>
>>> j'ai du merdoyer grave dans le choix du fichier cijoint.fr
>>>
>>> voil� une version correcte !!!
>>> http://www.cijoint.fr/cjlink.php?file=cj201001/cijGt6y2uc.xls
>>>
>>
>>
>
>