Contenu récent par celegorm

Re : concaténer les valeurs d'une zone j'ai trouvé, suffisait de transformer la valeur en string comme ceci: cstr(cell.value) et ça donne : Sub macro3() Dim chaine As Variant Set nms = ActiveWorkbook.Names Set wks = Worksheets(1) If (nms.Count <> 0) Then 'For r = 1 To nms.Count zone =...

Re : concaténer les valeurs d'une zone alors voici ce que j'obtiens Sub macro3() Dim chaine As Variant Set nms = ActiveWorkbook.Names Set wks = Worksheets(1) If (nms.Count <> 0) Then zone = nms(1).Name For Each cel In Range(zone) chaine = chaine + cel.Value Next...

Re : concaténer les valeurs d'une zone c'est parfait ! dès que j'ai terminé mon code complet, je vous l'envoi merci merci merci ! !! :)

bonjour à tous, je voudrais faire un script qui permette de concaténer dans une variable tous les éléments d'une zone nommée.(les name()... pardon j'emploi zone car je ne sais pas comment ça s'appelle). Pour commencer, je n'arrive pas à trouver comment faire pour savoir quelles sont les...

rebonjour à tous j'aimerai savoir le nom d'une boite de dialogue d'excel 2007, comment faut-il faire ? Il s'agit de la fenêtre "modifier la requete sur le web" qui apparait lorsque l'on fait un clic droit sur le résultat d'une requete web (querytable...) puis que l'on choisi "modifier la...

bonjour à tous, je tente de trouver une méthode pour comparer deux querytables en provenance d'un site web (pour voir si le site a changé). Le nom du site web est paramétrable par l'utilisateur (mis dans strsearch) je ne sais pas par quel bout prendre ce problème car : la querytables se...

Re : tester l'existence d'une "référence" alors effectivement ça me supprime l'occurence test mais à ma grande surprise, le script crée un test_1... puis un test_2 etc. même si "test" a disparu. Du coup je me retrouve rapidement avec des dizaines de names.... o_0 edit: apparemment c'est un...

Re : tester l'existence d'une "référence" je teste, merci beaucoup en tout cas :) résultat: error 9 le "Set essai = ActiveSheet.QueryTables("Test")" donne une erreur "l'indice n'appartient pas à la sélection"

Re : tester l'existence d'une "référence" je vais être plus précis : lorsqu'on crée une querytable, elle prend un nom. je voudrais effacer la précédente querytable. Mais avant de l'effacer, il faut que je teste son existence (j'utilise toujours le même nom "test"). Comment faire pour récupérer...

bonsoir à tous, ma première journée avec VBA aura été mouvementée. là j'essaye de tester l'existence d'un groupe de valeurs. le code Application.Goto Reference:="test" me pose problème car cette référence "test" n'existe pas forcément. Et lorsqu'elle existe, je veux la supprimer. Je n'arrive...

Re : worksheet_change merci beaucoup, j'ai fait un grand pas :) j'ai mis le code dans "change" et non pas selection change pour que l'on n'ai pas à cliquer. (je sais pas si j'ai bien fait) j'ai fait en sorte qu'il m'affiche "modifié" en C2. Par contre, si à la suite de "modifié à" je rajoute...

Re : worksheet_change mon script doit me servir à surveiller si des changements interviennent sur un site web. donc en A1 j'ai la donnée qui vient du site et je dois faire apparaitre "a changé " disons B1.... merci de votre aide :) alors j'ai réussi à comprendre qu'il fallait aller dans le...

bonjour à tous, je débute en vba et j'ai du mal à comprendre comment on exécute le code. Notamment, je ne comprend pas comment utiliser/intégrer ce code: Private Sub Worksheet_Change(ByVal Target As Range) 'permet de sortir de la procédure si plus d'une cellule est sélectionnée...