Profil de cs_kouki69 - CodeS SourceS

Workwheet change, revenir à la cellule active Résolu

Bonjour, C'est surement très simple mais je ne trouve pas de solution rapide, manque clairement de connaissances sur VBA. Merci à vous de vous interesser à mon petit problème. J'ai besoin de mettre à jour un graphique à chaque fois que je modifie une cellule. Par exemple, je tape une valeur dans la cellule "A10" et je veux que mon ... Lire la suite

Et le petit code est: With Worksheets("Cmpbll gear").ChartObjects("Graphique 2").Chart.Axes(xlValue) .MaximumScale = Range("X54") End With J'avoue que je ne comprends pas trop la structure, mais ça marche. Lorsque j'aurais un peu plus de temps, je me pencherais sur les rudiments...peut-être à bientôt pour un nouveau s...

C'est bien de parler de rudiment de chez rudiment, celà permet de reconstruire des bonnes fondations... J'avais bien mis le s à Worksheet, ça ne marchait pas, j'ai du l'enlever pour essayer.... Je présume que la ligne : Worksheets("Cmpbll gear").ChartObjects("Graphique 2").Chart-- permet de déclarer que la suite des commandes se...

J'ai activé l'aide VBA (l'aide était dirigée vers offices.com....) Je suis en train de lire les articles selon tes conseils... Il semble que la première ligne bug déja...., il me surligne en bleu Worksheet (que j'ai souligné ci-dessous) LE message est le suivant: Erreur de compilation: Sub ou function non définie....je creuse.... Pri...

Pardon si ce site est réservé aux "Développeurs", moi je suis un simple novice qui utilise Excel et VBA pour m'apporter de l'efficacité dans mon boulot. La programmation n'est pas mon métier et je n'ai pas de budget d'heure pour la formation en VBA...et pourtant j'arrive à faire pas mal de choses en VBA même si aux yeux de certain je ne c...

Bonjour ! Il ne faut pas croire que j'écris des codes depuis 9 ans autrement, ce serais peut-être moi qui réponderais à tes messages aujourd'hui....;-)...je me suis inscris il y a 9 ans, certes, depuis de l'eau à coulé sous les ponts, dailleurs je m'aperçois que ce site est beaucoup moins fréquenté...à "l'époque", les forumistes étaient ...

Ucfoutu, La raison pour laquelle je travaille à coups de Activate, Select... est que je ne sais pas faire autrement et il faut donc que j'apprenne. Déja, est-ce que écrire le petit code dans une "fenêtre" : Private Sub Worksheet_Change(ByVal Target As Range) est la bonne approche ? Pourquoi mettre Worksheet("feuil2").Chart...., al...

Débutant , help Récupérer valeur d'une cellule pour un calcul

Bonjour, Je suis débutant en programmation et j'ai du mal à commencer. Objectif : Trouver la valeur x (entier) de façon à ce que le résultat de l'équation Y soit égale à la valeur de Phi qui se trouve à la cellule B2 de la feuille excel (feuil1) Le résultat doit être donné dans une autre cellule que nous appelerons B6. L'équati... Lire la suite

Désolé Ucfoutu de t'avoir fait perdre ton temps, le but de ma question était de trouver la méthode, et non résoudre l'équation linéaire que j'ai pris comme exemple pour la simplification, j'avais bien spécifié que l'équation était plus compliquée. Je vais approndir ce que dit Cmarcotte concernant valeur cible sous Excel. Je suis toujour...

Ben...c'est vrai que ce n'est pas clair et que l'šŠquation se ršŠsouds facilement mais l'šŠquation est plus compliqušŠe. C'est pourquoi je veux chercher le x en faisant une boucle Donc je redeveloppe... Je met la totale....on oublie les variables dšŠclaršŠes ci-dessus... DeltaŠÅ= valeur dans la cellule B2 on cherche š€ ce que Y = ...

1) Ben en fait il faut trouver la valeur de x pour que Y soit égale à phi (qui est déja fixée dans la cellule B2. Il y aura donc une boucle à faire (prochaine étape...) Au final la condition est que Y = phi... 2) Je n'ai pas écris la formule complète, le principe restera le même. en résumant : pour x = 1 Y = Z+C Est-ce que Y e...

Choisir NON au message excel "le fichier n'est pas au format microsoft excel"

Bonjour, Lors de l'exécution de mon code, Excel me met le message suivant dans une message box: "xxxx.dat n'est pas au format Microsoft Excel, voulez-vous enregistrer vos modifications ?"J'ai le choix entre Oui, Non et annuler. Comment éviter d'avoir cette fenêtre qui s'affiche et lui imposer la réponse "NON" d'office ?? Merci ... Lire la suite

Merci, mais non, ça ne marche pas...

Fermer une application ouverte avec shell

Salut, Je n'ai rien trouvé sur le site qui réponds à ma question, pourtant, je pense que c'est quelque chose qui a dû circuler sur ce site, bref... Voilà, je lance une application via VBA (programme de calculs qui utilise des données créées sous excel) Mais une fois le calcul fait, je dois fermer l'application mais je ne vois pas comme... Lire la suite

Pas d'évolution... S'il faut énumérer les processus, dois-je aller dans gestionnaire de tâches, processus ??j'en ai 61 actuellement. Private Const WM_CLOSE As Long = &H10 Private Const HTCAPTION As Long = 2& Private Const GW_HWNDNEXT As Long = 2& Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassN...

Ca tourne sans bug, par contre, l'application est toujours ouverte. Par contre, l'exécutable qu'on lance (PFXWIN) semble lancer un logiciel qui s'appelle "WATCOM window application", et c'est cett eapplication qu'on veut fermer. Le PFXWIN ne lance rien d'autre Dans le gestionnaire de tâche, l'exécutable PFWWIN.EXE est tjrs présent. ...

J'ai essayé comme ça, mais il n'y a rien à faire, le premier paquet de "private const private declare", il n'aime pas, tjrs le même message d'erreur. J'ai positionné de la manière suivante (tout mon code) Private Sub CommandButton2_Click() Dim chemin As Variant Dim nomdefichier As String Dim newnomdefichier As String Dim newnom...

J'utilise Call mais j'ai le message d'erreur suivant : "Erreur de compilation, seuls des commentaires peuvent apparaitre après End Sub, End Function ou End Property"...pourtant, il n'y a ni l'un ni les autres ...???? La première ligne Private Declare Function FindWindows ... est soulignée lors du message d'erreur. ... Call stopf...

Merci PCPT, Ca me parait drolement compliqué pour fermer une application ! Apparemment, ça ne marche pas, peut-être parceque c'est du VB et non du VBA ? Kouki

Ecrire dans un fichier txt (notepad) via VBA sous Excel

Bonjour Voilà, est-ce possible de modifier des données dans un fichier txt à partir de VBA sous excel. Je m'explique : J'ai besoin de faire tourner un programme dont le fichier de données peut être ouvert avec un editeur tel que notepad. A partir de Excel Je modifie une valeur dans la cellule A1 Cette valeur devra être copié dan... Lire la suite

Merci Relax, Finallement, j'ai fais plus simple, j'ai utilisé la commande CONCATENER d'excel qui me permet d'assembler dans une même cellule des valeures provenant d'autres cellules, en enregistrant sous "type de fichier texte", je me retrouve avec la forme voulue. Je jeterai un oeil sur ton code, mais j'avoue qu'à première vue, je n'y...

Merci mais je n'y ai pas trouvé mon bonheur. Ce que j'ai à remplacer, ce sont des valeurs numériques, localiser à des coordonnées précises. Kouki

Passer de WRQ reflection à Excel et revenir à WRQ Reflection

Bonjour, Voilà, grâce à l'aide de Renfield, j'ai pu avancé dans mon code et passer de Reflection à Excel. Le problème que j'ai maintenant c'est revenir à WRQ Reflection sans quitter excel car j'ai besoin d'y retourner par la suite. Le début du code est ci-dessous : Dim oBook As Object Dim oReflection As Object Set oExcel = G... Lire la suite

Tu as raison, le souci n'est pas là puisque finalement, j'arrive bien à revenir sur Reflection, étant donné que je fais ma copie d'écran de reflection et que celà fonctionne (en rouge ci-dessous). Le pb est ailleur alors, car à partir de line1, il bloque ... ??? On Local Error Resume Next Dim oExcel As Object Dim oBook As Object Dim...

Donner comme nom de fichier le contenu du "copié" Résolu

Bonjour, Je fais une petite macro sur VBA, à partir de WRQ Reflexion et je souhaiterais faire un savescreen. Le savescreen sera au format BMP, sera stocké dans un chemin donné, le nom du fichier devra porter le même nom qu'un nom noté à l'écran, lequel est selectionné et mis en mémoire à l'aide de la fonction "copié" (.CopySelection ci-... Lire la suite

Toi tu joues, moi je me triture les neuronnes ...je ne suis qu'un pauvre apprenti VBA...je n'est pas encore eu le temps de comprendre le code mais je vais m'y atteler, merci encore ... Kouki69

Merci Renfield, ça marche impec, quel talent !! @+ Kouki