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

DateAuteur du sujetSujetExtrait du message
04/07/2020 à 23:03rocket4 Reccursivité pour le calcul d'une factorielleMerci infiniment H2So4 pour ces précieux conseils , 'j'en prend note...
04/07/2020 à 10:20rocket4 Reccursivité pour le calcul d'une factorielleBonjour , j 'ai tenté de calculer une factorielle d'un entier par deux façon d’écrire mon code : là ca marche par contre avec cette seconde facon : en mode pas à pas j'arrive sur la ligne recc= z ou j'ai bien 120 qui est la resultat attendu ensuite le compilateur fait des aller retour entre "end if"...
11/06/2020 à 10:20rocket4Question sur les caracteres alphabetiquesMerci pour cette réponse ,...en effet c'est mystérieux ! ....peut etre que Ucase et Lcase sont dotés de deux possibilités qui fonctionnent en arrière plan, si on demande le Lcase d'une chaine de caractère via un msgbox ou dans une cellule on aura la chaine en majuscule , par contre si on procède à u...
11/06/2020 à 10:01rocket4Question sur les caracteres alphabetiquesMerci pour cette réponse Dan et aussi à tout les autres participants , en clair voici ce que j'ai fait : et je n'ai pas utilisé CODE...
10/06/2020 à 10:24rocket4Question sur les caracteres alphabetiquesMerci pour vos réponses, J ai réussi à classer par ordre alphabétique les, éléments de mon tableau en utilisant cette comparaison mais ce que je voudrais comprendre c est pourquoi si j écris par exemple if Lcase(t(0)) >Lcase(t(1)) then... Il y a une comparaison de type arithmétique entre deux ent...
10/06/2020 à 09:25rocket4Question sur les caracteres alphabetiquesUne toute petite question sur les caractères alphabétiques , si je dispose d'un tableau de type array contenant les caractères tab= array("ZA" , "GH" ," WS" , "J" , "KL") , et que je voudrait les comparer deux à deux , le fait d 'écrire par exemple : if Lcase(tab(0))> Lcase(tab(1)) then .... trai...
23/05/2020 à 18:02rocket4Renommer photosPurrée je viens de trouver .... 2s de reflexion et la solution apparait par magie tout simplement le Application.screenupdating = true en debut de code Merci quand meme ...
23/05/2020 à 17:58rocket4Renommer photosBonjour , j'ai concu le bout de code suivant , il marche parfaitement en mode "pas à pas" seulement lorsque je passe à l’exécution normale via un bouton de formulaire l'importation de la photo à modifier vers ma feuille active ne se fait plus , après avoir cherché je n'en vois pas la cause c'est un...
27/04/2020 à 21:59rocket4 Sortie de programmeMerci Algo plus... Ça paraît tout bête...
27/04/2020 à 14:52rocket4 Sortie de programmeBonjour , j'ai ecris le bout de code suivant qui vise à trouver l'emplacement d'un fichier ( ici de type xlsx et nommé "ICI" soit ici.xlsx ) placé l'importe ou dans un dossier ou un sous dossier de mon bureau , en faisant tourner le code il marche puisque l'emplacement du fichier est trouvé pour cel...
25/04/2020 à 21:56rocket4 Partie decimale d'un réelMerci pour cette réponse "ric" , je ne passe pas par une cellule mais par vba , du coup ca me donne une idée , merci à toi...
25/04/2020 à 20:14rocket4 Partie decimale d'un réelJ'aurais une toute petite question rapide sur le résultat d'une fraction , si je fais le calcul 3/111 Excel vba me retourne : 0.027027027027027 donc un affichage qui s’arrête à 15 chiffres après la virgule . avec la calculette Windows la partie décimale est plus longue et me retourne 0,0270270270270...
23/03/2020 à 17:32rocket4 Boites de dialoguesSuper !!! merci xorsankukai exactement ce qu'il me fallait ...
23/03/2020 à 15:20rocket4 Boites de dialoguesJ'ai une toute petite question : pour un un modele standard de boite de dialogue en vba , on a généralement : on aura donc un msgbox avec deux boutons nommés "yes" et "no" , est il justement possible de pouvoir nommer autrement ces deux boutons ...
26/02/2020 à 11:37rocket4 Envoyer un fichierMerci pour la rapidité de vos réponses et merci à M12 pour le site. Bonne journée à vous deux...
26/02/2020 à 11:21rocket4 Envoyer un fichierBonjour, j ai une petite question simple, je souhaiterai envoyer un fichier à une personne contenant des macros, je sais que l envoi par mail désactivé toute les macros et à réception le fichier est dépouillé de toutes ses macros, quel support me conseillerez vous j ai pensé au cloud de google, avez...
12/02/2020 à 15:44rocket4Fermeture d'un fichierBonjour Patrice 33740 , merci pour votre réponse , j'ai modifié comme ceci en tenant compte de votre suggestion : l'erreur persiste au niveau de la meme ligne......
12/02/2020 à 15:32rocket4Fermeture d'un fichierBonjour , j'ai une petite question rapide, j'utilise la méthode fso pour inventorier mes fichiers ( pas forcement des fichier excel ) et fermer ceux ci que ne m 'intéresse pas s'il sont ouverts : j'ai indiqué la ligne du beug , comment pourrais je la modifier ? Encor merci pour vos idées...
03/02/2020 à 09:26rocket4 Plages de cellules dans un tableau de type ArrayMerci pour cette réponse Gmb je vais examiner ca...
02/02/2020 à 22:21rocket4 Plages de cellules dans un tableau de type ArrayJ'ai un problème de syntaxe , j'ai crée un tableau de type array dans lequel les elements seraient des objets de type range (cellule) pour faire plus court voici ce que j'ai ecris mais il est clair que ca ne peut pas fonctionner ainsi puisque mes cellules sont des "objets " ,Il y a t il une astuce p...
02/02/2020 à 21:34rocket4Insertion d'images ou de documentsBonsoir , j'aurais une petite question rapide , si je souhaite inserer un document de type pdf , le code suivant convient bien si par contre je souhaite inserer une image de type .jpg ou jpeg , par quelle instruction dois remplacer la partie "AcroExch.Document.DC" ?j'ai essayer de faire quelques rec...
30/01/2020 à 15:51rocket4 Reinitialiser un projet VBAMerci pour cette réponse , Yvouille , c'est exactement ce que tu decris , je me demandais toutefois si cette action pouvait etre réaliser via une ligne d'instruction...
30/01/2020 à 15:28rocket4 Reinitialiser un projet VBABonjour , j'ai une question rapide ....mais j'ai un doute quand à une faisabilité...c'est tout simple j'ai un bout de code a executer , mais lorsque je veux réinitialiser mon projet depuis le compilateur je clique sur "Exécution " puis sur "Réinitialiser" , existe il un moyen de le faire depuis une...
28/01/2020 à 13:49rocket4 Suppression d'objetsMerci pour cette réponse très élaborée G Gauthier. Je l essayer de ce pas, un grand merci à vous...
28/01/2020 à 11:23rocket4 Suppression d'objetsBonjour j'ai une question rapide : ma feuille de calcul contient des bouton de formulaires et des listes derouantes dans certaines cellules , lorsque j'enregistre ma feuille dans un autre classeur les boutons figurant sur ma feuille doivent etre effacés via le bout de code suivant jusque la tout va...
28/01/2020 à 01:07rocket4 Application.runSalut Ériiic pas mal comme tournure, je vais faire selon ton conseil qui m à l air plus, sage, a vrai dire je pensais pas qu on devait manipuler des fichiers avec délicatesse au risque de les voirs mourir...
27/01/2020 à 23:15rocket4 Application.runBonjour juste une question rapide , je remarque que lorsque que j'utilise application.run dans un code les instructions qui suivent ne sont pas executés comme dans cette exemple : je remarque precisement que tout ce qui vient apres application.run , meme comme ouvrir un formulaire dans A ne se fait...
27/01/2020 à 00:02rocket4 Comportement aléatoire de fichiers..mais j'ai pu trouver une parade un peu laborieuse ...mais elle marche en vous remerciant quand meme pour votre interet a ce fil...
27/01/2020 à 00:01rocket4 Comportement aléatoire de fichiersBonjour eriiic , oui en fait le fichier comporte des données "un peu sensible " je ne me vois pas le mettre à dispo du forum pour qu'il soit telechargé par quiconque .....
26/01/2020 à 22:13rocket4 Comportement aléatoire de fichiersA force de chercher comme un dingue j'ai fini par trouver une parade , j'ai logé une instruction "malicieuse" dans le thisworkbook pour la fermeture du fichier de destination ce qui rend les choses equivalentes à une manip ouverture fermeture manuelle du coup la procedure de copie de A vers B obéit...
26/01/2020 à 20:57rocket4 Comportement aléatoire de fichiersPar contre en faisant un aller et retour sur le classeur de destination (ouverture et fermeture simple ) ...ca marche et aucun message d'erreur , la j'avoue etre depassé par le fait ..je pensais que tout pouvais s'expliquer en vba ...mais là je tombe sur une premiere merci d'avoir répondu ThauThème...
26/01/2020 à 14:41rocket4 Comportement aléatoire de fichiersMerci pour cette réponse ThauTheme, je vais essayer et vous tenir au courant J avais dans mon code j avais simplement utilisé l 'instruction ...
26/01/2020 à 13:58rocket4 Comportement aléatoire de fichiersJ ai une question rapide (celle ci n aura pas être pas de réponse mais je tente..) Je dispose d un fichier À et d un fichier B Je copie une feuille de À dans B. Pour le faire rien de plus simple, j'utilise l'instruction copy before:= Le problème est le suivant : Depuis À j ouvre B et j exécute l'ins...
24/01/2020 à 00:48rocket4Question sur Top,Left, Widht,heigtJe pense comprendre.... une cellule à par defaut une hauteur de 15 et une largeur de 60 ... mais 15 ... millimètres ca ne me parait pas etre le cas ....? Merci pour vos commentaires...
24/01/2020 à 00:44rocket4Question sur Top,Left, Widht,heigtJ'ai une question toute bête , je saisi la signification de Top: Left,Widht,heigt , mais comment se donner une échelle de mesure par rapport aux cellules d'une feuille de calcul , si par exemple je veux que la valeur de mon Top soit de 4 cellules entre le bord supérieur de ma feuille et la plage de...
04/01/2020 à 06:47rocket4 CalendrierUn grand merci Oxydum et meilleurs vœux également...
02/01/2020 à 21:16rocket4 CalendrierBonsoir , j'ai ecris le code suivant qui permet de créer un calendrier de 12 mois il marche bien mais est t il suffisamment optimisé ? Merci à vous...
28/12/2019 à 12:02rocket4 Question sur une methodeMerci pour vos, reponses...
28/12/2019 à 08:53thomas_pidoux Extraire les chiffres d'une chaîne de caractèresEn vba , si ta valeur est par exemple dans la cellule A1 : -26.6°C For i = 1 To Len(Cells(1, 1)) - 2 w = w & Mid(Cells(1, 1), i, 1) Next msgbox w ' retourne -26,6 (mais attention ca reste une chaine de type string)...
28/12/2019 à 08:36rocket4 Question sur une methodeJ'ai réalisé le bout de code suivant pour calculer les termes d'une suite du second ordre de type: Un+2=2Un+1 + 3.Un (rien d'exceptionnel) ,puis je dire que c'est écrit en mode récursif ? j'avoue me mélanger les pinceaux avec le mode "itératif" Merci. En vous remerciant...
12/12/2019 à 00:00rocket4 Proprietés d'un dossierJ'ai pu trouver finalement via l'instruction FileDateTime(dossier) merci tout de meme...
11/12/2019 à 23:20rocket4 Proprietés d'un dossierEst il possible de récupérer depuis vba , la date de création d'un dossier comme celui qu'on peut créer sur son bureau en faisant clic droit puis nouveau puis dossier ? c'est une donnée que l'on peut trouver dans les propriétés du dossier en le faisant manuellement , mais cela est il faisable en vba...
10/12/2019 à 11:23rocket4 RegroupementHonte à moi ca tenait a peu de chose ( des parenthèses mal placées ) en tout cas un grand merci AlgoPlus...
10/12/2019 à 10:40rocket4 RegroupementJ'ai ecris un bout de code qui permet à partir d'une sélection de plage faite via ma souris sur ma feuille de calcul d'effectuer un regroupement vers le haut toutes les données de chaque colonne de sorte que chacune d'entre elle ne contienne pas de données éparpillées sur des lignes . j'essaie d'en...
04/12/2019 à 11:07rocket4 Calcul ModuloMerci Dahny, du coup je viens de penser à utiliser la valeur absolue 8...
04/12/2019 à 09:19rocket4 Calcul ModuloJ'ai une petite question sur le calcul modulo, si je souhaite calculer a=(4-17) mod 8 , cela pourrait se simplifier en a= -13 mod 8 soit aussi a= -5 mod 8 et comme 5 = 8-3 alors 5 congru à -3 [8] et donc finalement a =3[8] ( a congru à 3 modulo 8) , vba s'arrete dans le calcul à : a=...
28/11/2019 à 14:36rocket4 BouclesSalut h2so4 , j'ai tenté une solution a ma sauce (histoire de ne pas faire du copier coller mais plutot de s'inspirer des conseils fournis) , mais qui sera pas aussi elegante que la tienne , la voici ...
27/11/2019 à 17:35kouamviScénarios de combinaisonsCe c est bien prendre 2 éléments parmi 12 sans répétition C est C(12,2)=12*11/2=66 issues et avec répétions c' est C(12,2)+12= 66+12=78 issues mais sans ordre (comme par exemple 1,2 2, 1 ou en prendra un seul cas sur les, deux) Et si tu veux toutes les dispositions possible avec ordre ce sera 12.12=...
27/11/2019 à 15:26rocket4 BouclesUn grand merci pour avoir pris le temps de répondre h2s04, je vais regarder ta 2 ieme solution de pré...
27/11/2019 à 14:28rocket4 BouclesMerci H2sO4 c'est tres elaborés !bravo je vais essayer de comprendre tout ca une notation que je ne comprend pas au debut : j'ai compris qu'on designe 4 boucles et chacune allant de 1 à 3 , mais d'ou viens ce type de notation c'est un tableau comme array(,...) ? merci...