r

Membre impliqué

Inscrit le :30/08/2011
Dernière activité :04/12/2020 à 12:04
Version d'Excel :2010
Messages
1'209
Votes
4
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Messages postés par rocket4 - page 4

DateAuteur du sujetSujetExtrait du message
07/12/2018 à 10:13rocket4 Copie d'une Feuille..suis pas reveillé ...c'est tout simple avec l'enregistreur de macro qui donne merci quand meme .....
07/12/2018 à 09:59rocket4 Copie d'une FeuilleJ'ai une toute petite question , la copie d'une feuille dans son integralité vers une autre feuille du meme classeur s'effectue bien via ce bout de code toutefois la copie est "grossie" ou zommée je pourrais meme dire en x 200, apres avoir cherché je ne vois pas comment y remedier ....Auriez vous un...
07/11/2018 à 16:18rocket4 Décomposition en facteurs premiersJ'ai encor pu reduire le code en n'utilisant que les nombres premiers compris entre 1 et l'entier choisi au lieux de passer par une liste de nombres premiers allant de 1 à 100 ...
07/11/2018 à 16:09rocket4 Décomposition en facteurs premiersMerci Pedro22 c'est un poil mieux , bien vu pour la restitution de "e" encor merci...
07/11/2018 à 14:56rocket4 Décomposition en facteurs premiersBonjour j'ai ecris le code suivant pour decomposer un entier en facteurs premiers ,il marche bien mais peut on faire plus court ou l'ameliorer ? avec sa fonction "premier" qui verifie qu'un nombre est premier : Function premier(x As Integer) As Boolean merci pour vos commentaires...
07/11/2018 à 13:51rocket4 Calcul moduloMerci Steelson , je savais que le resultat etait 0 mais je voulais faire effectuer le calcul direct au compilateur...
07/11/2018 à 10:30rocket4 Calcul moduloLa calcul suivant n'est pas possible à réaliser ( je tourne avec excel 2003) celui ci affiche un dépassement de capacité , existe t il un moyen de contourner cela ou tout simplement pas ? Merci pour vos suggestions...
26/10/2018 à 20:13rocket4Calcul matricielFinalement j'ai opté pour une autre facon de faire bien meilleure pour calculer mon produit matriciel ,...merci tout de meme...
26/10/2018 à 18:58rocket4Calcul matricielUne petite question ...je voudrais faire du calcul matriciel , pour cela j'introduis les vecteurs colonnes de mes matrices à manipuler comme suit : pour la matrice A colA1 = Array(1, 2, 3) colA2 = Array(4, 5, 6) colA3 = Array(7, 8, 9) les colonnes de ma matrice A sont posées sous forme de tableaux s...
26/10/2018 à 18:50rocket4 DenombrementMerci à vous tous pour vos nombreuses interventions...
19/10/2018 à 17:45rocket4 DenombrementMerci pour vos réponses , puisqu'il s'agissait d'une boucle for allant de 0 à 10 je pensais qu' a i =10 la boucle se terminait ..on en apprend tout les jours ..merci à vous...
19/10/2018 à 16:17rocket4 DenombrementBonjour , j'ai une question assez simple par rapport à la reaction de mon bout de code qui consiste à denombrer le nombre de fois qu'un nombre est repeté , le voici j'obtiens une erreur au niveau de l'instruction : car i prend la valeur 11 ce que je comprend pas ! par contre si j'effectue cette corr...
24/09/2018 à 19:59rocket4Question sur textboxJe ne pense pas que ce soit ca , j'ai tout de même essayé .....merci quand meme...
24/09/2018 à 17:05rocket4Question sur textboxBonjour j'ai un probleme tout bete , avec la suite d'instructions suivantes posées dans le listbox d'un userform : ma textbox de mon userform (la seule ) ne me retourne pas le contenu "cell.Offset(, -2)" car cell contient une valeur numerique par contre si je change le contenu de la "cell" en par ex...
14/09/2018 à 22:19rocket4 Shape et UserformMerci Galopin01 je vais me pencher sur votre exemple ....
14/09/2018 à 17:02rocket4 Shape et UserformJ'ai une question toute simple , lorsque on integre une image à un userform est il possible d'affecter sur cette meme image d'autres formes comme par exemple des "shapes" en forme de bulle" qui permettrait d'etre renvoyé sur une page donnée du classeur contenant l'userform ? Merci...
27/08/2018 à 05:00rocket4 Tableau de type ArrayTheze , j'ai repris votre exemple mais j'ai constaté que cela ne marche pas si le nombre d'elements de chaque matrice n'est pas le meme par exemple avec...
27/08/2018 à 04:27rocket4 Tableau de type ArrayMerci à vous tous pour vos solutions , merci a Dhany egalement , si je comprend bien votre solution on part de 2 tableaux admettons a = array(1,2,3,4) b= array(5,6,7,8) et on peut former un tableau t =array(a,b) tel que par exemple t(1)(2) = 7 , si c'est le cas j'avais deja utilisé cette forme pour...
26/08/2018 à 05:08rocket4 Tableau de type ArrayUn grand merci pour vos nombreuses réactions, je me rend compte que ce ne n'est pas tout simplement évident voir possible sans au minimum avoir recours à une petite boucle...
25/08/2018 à 21:48rocket4 Tableau de type ArrayJ'ai une question rapide , je sais que je peux lister des elements dans un tableau de type array comme par exemple T= array(1,2,3,4,5,6,7,8,6) , ce qui est un tableau en une dimension , existe t il une facon d'ecrire la meme chose en utilisant Array mais en deux dimensions?( sans passer par une bouc...
26/07/2018 à 16:14rocket4 Tableau...
26/07/2018 à 00:02rocket4 TableauJ'ai trouvé c'est tout bete avec Chr(65+k) k compris entre 0 et 25...
25/07/2018 à 23:45rocket4 TableauUne question toute bête , existe t il un type de tableau ou une fonction sous vba qui me permet d'avoir un tableau reprenant toutes les lettres de l'alphabet plutot que d’écrire T = array("A","B","C","D",........."Z")? Merci pour vos réponses Cordialement...
16/07/2018 à 22:49rocket4Ecart das calculs..j'ai testé la fréquence d'otiention du signe "-" avec la suggestions faite par Eriic pour l'affectation du signe en reprenant et en ayant ecrit le bout de code suivant : sur 1 000 000 d'essais la fréquence d'obtention du "moins " n'est que de 33,3 % est ce suffisant ... merci...
16/07/2018 à 22:37rocket4Ecart das calculsTrop lourde ...pour ma facon de faire...
16/07/2018 à 22:36rocket4Ecart das calculsBonsoir eric , dans ma démarche j'ai tout simplement choisi de facon aleatoire un signe + ou - et un réel compris entre 0 et 360 ° mais bon j'ai tenu de vos remarques sur la facon de procéder qui etait jusque la trop lourde et vous en remercie...
14/07/2018 à 23:30rocket4Ecart das calculsEt merci à M.Ferrand pour son indication...
14/07/2018 à 23:30rocket4Ecart das calculsPas mal Eriic ,!!! merci pour cette réponse élégante ...
14/07/2018 à 19:40rocket4Ecart das calculsMerci mFerrand et eric , comme imprécisions j'obtenais pour premieres valeurs exemples : -56,98 - 183,25 + 130.44 cette serie devient ensuite +304 + 177 +130,44 alors que cela devrait etre (360-56.98 , 360-183,25 , 130,44) soit donc ( +303,02 +176.75 130,44) 'j'ai remodifié le programme comme suit ...
14/07/2018 à 16:08rocket4Ecart das calculsBonjour , j'ai saisi le bout de code suivant et trouve des anomalies de calcul Sub angle_neg_pos() sig = Array("+", "-") x = sig(Rnd * (3 / 2)) & Rnd * 360 ' retourne un angle choisi aléatoirement entre 0 et 360° sens trigo ou anti trigo y = sig(Rnd * (3 / 2)) & Rnd * 360 ' retourne un angle...
01/05/2018 à 08:03rocket4 Clé qui ouvre une porteUn grand Merci pour ces explications Theze, j ai la un cours complet sur la notion de dictionnaire.. Royale ...
30/04/2018 à 22:15rocket4 Clé qui ouvre une porteFinalement c'est une notion qui est semble à celle des tableaux avec laquelle j'ai deja l' habitude de travailler ...tableau ou dico c'est pareil finalement ...une question cependant comment remplir un dictionnaire , pour obtenir l'equivalent de ceci au niveau tableau : T =array("vert","jaune ",roug...
30/04/2018 à 21:54rocket4 Clé qui ouvre une porteMerci pour cette réponse Theze .. je vais me pencher sur l'utilisation des dictionnaires du coup...
30/04/2018 à 17:49rocket4 Clé qui ouvre une porteJ'ai une petite question concernant un probleme de math ... le voici : on dispose d'un trousseau de 25 clés , une seule clé permet d'ouvrir la porte , on fait donc de multiples tentativesavec une clé choisie au hasard et on arrete lorsque la porte est ouverte .Pour cela j'ai redigé le bout de code s...
19/04/2018 à 21:52rocket4 Remplacement de caracteresJe n'avais pas vu que ton message etait destiné à Archer ... désolé...
19/04/2018 à 21:51rocket4 Remplacement de caracteres..car je ne modifie que la valeur t(i) de mon tableau ......
19/04/2018 à 21:48rocket4 Remplacement de caracteresPas du tout dhany je viens de faire le test avec ABCHEAGH et j'obtiens bien HBCHEAGA avec le code suivant : Option Base 1 Sub Feuil2_Bouton1_QuandClic() Dim t As Variant ReDim t(1 To Len(Cells(1, 1))) For i = 1 To UBound(t) t(i) = Mid(Cells(1, 1), i, 1) Next p = t(1) q = t(Len(Cells(1, 1))) t(1) = R...
19/04/2018 à 19:53rocket4 Remplacement de caracteresUn grand Merci dhany , j'ai relu votre code et je ne suis pas tres famillié avec certaines lignes de code que vous utilisez toutefois j'ai pu m'en sortir via la notion de tableau en ecrivant un truc asez simple : Option Base 1 Sub Feuil2_Bouton1_QuandClic() Dim t As Variant ReDim t(1 To Len(Cells(1...
18/04/2018 à 07:55rocket4 Remplacement de caracteresMerci dhany je vais regarder tout ca de prè...
17/04/2018 à 10:30rocket4 Remplacement de caracteresBonjour j'ai une toute petite question sur une chose qui parait pourtant simple , dans la cellule A1 j'ecris ABCDEFGH ensuite je voudrais que H prenne la place de A et A la place de H ce qui donne HBCDEFGA pour ca j’écris les lignes suivantes memoire = Left(Cells(1, 1), 1) ' je stock le premier cara...
20/03/2018 à 20:16rocket4 Dépassement de capacité en calculMerci à vous , ca fonctionne tres bien ...
20/03/2018 à 10:57rocket4 Dépassement de capacité en calculJe souhaiterai obtenir les resultats du calcul suivant le tout cumulé dans une meme variable nommée z : For x = 1 To 5 For y = 1 To 5 z = z & " " & Round(0.5 * (2 * x ^ 2 + 2 * x * y - 15 * x - 5 * y) / (x ^ 2 + y ^ 2 + 2 * x * y - 10 * x - 10 * y), 2) Next Next MsgBox z j'obtiens un message...
16/03/2018 à 20:08rocket4 OperateursExcellant SabV ..ca marche ..un grand merci...
16/03/2018 à 19:43rocket4 OperateursMerci pour cette réponse LouReed mais cela ne marche pas .....
16/03/2018 à 19:01rocket4 OperateursBonsoir ,...j'ai une petite question ..j'ai pas mal cherché avant ..mais sans trouver avec le tableau de symboles suivant : operateurs = Array("+", "-", "/", "*") qui sont les operateurs arithmetiques comment puis je modifier l'expression suivante pour obtenir un resultat ..? tel quel cela ne marche...
17/02/2018 à 13:10rocket4 Calcul et depassement de capacitéMerci H2so4 ca regle effectivement le petit soucis ...je m'appercois que la fonction MOD a ses limites...
17/02/2018 à 07:27rocket4 Damier rouge et noirPar contre je ne connais pas le symbole que vous avez placé à coté des variables i et j en déclaration ? qu'est ce que cela représente ? merci...
17/02/2018 à 07:25rocket4 Damier rouge et noirTres condensé , et en plus en peu de lignes ! bravo pour cette solution Mferrand ...Merci à vous...
17/02/2018 à 07:22rocket4 Calcul et depassement de capacitéBonjour , j'ai ecris ce petit bout de code me permettant de generer une suite de 10 chiffres distincts (0 à 9) de sorte que: le premier chiffre soit divisible par 1 le nombre formé par les deux seconds chiffres soient divisibles par 2 le nombre formé par les trois premiers chiffres soient divisibles...
15/02/2018 à 01:08rocket4 Damier rouge et noirMerci Mferrand je vais me pencher sur votre solution...