Résultats de la recherche

Bonsoir à tous, Est il possible de réaliser en une ligne de code : Tableau = Sheets("Feuil1").Range("A2:E2") (Avec Tableau un array des valeurs). Ou bien il faut boucler de la colonne A à E avec un FOR et entrer les valeurs une par une. Merci Mattharm.

Bonsoir, J'aimerais réaliser un code vba réalisant cela : If Selection = Une ligne entière then Selection.Interior.Colorindex = 6 End If If Selection = Une cellule, ou plusieurs cellules then Sélectionner la ligne correspondante Selection.Interior.Colorindex = 6 End...

Bonjour à tous, J'aurais besoin de comparer deux chiffres par une soustraction en prenant en compte une intersection de valeurs. Par exemple la série 10,11,12 --> à exclure. Si j'ai A =14 et B = 7 j'aimerais que A-B me retourne 4. J'aimerais donc développer une boucle de type : if...

Bonjour à tous, On est encore en janvier donc je vous souhaite à tous une bonne année 2010 ! Voilà je développe une application et j'ai un petit conflit entre 2 ptits trucs : - D'un côté j'ai une cellule contenant une validation des données et une liste déroulante. Lors du changement...

Bonjour à tous, Je voudrais définir un nom qui référerait à une plage allant de A1 jusqu'à la dernière ligne strictement positive. =DECALER($A$1;ESTPANUL();;;1;1) C'est donc la partie ESTPASNUL qui me pose quelques soucis.... Merci Mattharm

Bonjour à tous, Je possède une série définie par un nom : "SERIE" (utilisant une formule DECALER) Je possède deux valeurs limites : 3 et 4. J'aimerais calculer la moyenne de ma série ainsi que l'écart type en excluant toutes les valeurs < à 3 et > à 4. J'ai essayé sans succès le...

Bonjour, Je crée actuellement un graphique dynamique en utilisant la fonction DECALER et il se trouve que j'aurais besoin d'ajouter une série valant y=x J'ai un tableau de 30 valeurs en abscisse et en ordonnée, et j'ai une cellule comportant la valeur minimale. J'aimerais tracer y =...

Bonjour à tous, J'ai un module de recherche qui me stocke dans des variable le nom des fichier d'un dossier. Ainsi j'obtiens : Fichier1 = fichier.name Fichier2 = fichier.name Fichier3 = fichier.name Dans une autre sub j'essaye de faire une boucle : i = 1 for i = 1 to 3...

Bonjour à tous, J'écris dans une feuille excel via une macro vba : Cells(1,1).value = Arg1 Cells(1,2).value = Arg2 Cells(1,3).value = Arg3 Cells(1,4).value = Arg4 N'y aurait il pas un moyen de faire plus simple ? Une espece de commande ou l'on donne la ligne et il incrémente tout...

Bonjour à tous, J'essaie de faire un calcul d'heures sous VBA. J'ai 4 variables dont le format est hh:mm:ss et je fais le calcul suivant : Temps = V1-V2-V3-V4 Il me répond incompatibilité de type.... (je n'ai pas déclaré mes variables) Merci, M.

Bonjour, Comment fait on pour déclarer une fonction à 4 sorties ? function (arg1, arg2,arg,3) as ... end function Merci à tous,

Bonjour à tous, J'essaie de mettre un filtre sur la fonction GetOpenFilename : Fichier = Application.GetOpenFilename(FileFilter:="Fichier,*.txt", Title:="Choix du fichier") Pour avoir tous les fichiers contenant "toto" j'ai essayé ça, mais ça ne fonctionne pas : Fichier =...

Bonjour à tous, J'aimerais faire une somme décalée : 1ière colonne : Chiffres 2ième colonne : Des 0 ou 1 3ième colonne : =si(B1<>0;somme(decaler(C1;;;1);"XX") mais je ne sais pas trop comment lui expliquer de prendre toutes les valeurs différentes de zéro.... Cf. Pièce jointe...

Rebonjour le forum, Question tout bête ! J'ai une sub définie telle que : Sub test(arg1, arg2 as Double) resultat = arg1+arg2 end Sub et quand j'essaye d'appeler ma Sub il ne veut pas : test(12,4) Ca doit être tout bête mais j'avoue que là.... je bloque... :)

Bonjour à tous, J'aimerais récupérer les bornes d'une Range pour les utiliser dans une fonction : function test(debut as Range) msgbox debut endfunctino sub princ(byval T as Range) test(left(T.address,instr(1,T.address,":"))) end sub Quelque chose dans ce goût là. Je suis...

Bonjour à tous, J'essaye d'exécuter une macro qui intervient sur sélection de cellule uniquement dans une zone donnée. Est il possible de mettre une boucle If sur une zone : If cells.select is In Range("A1:C5") Quelque chose dans ce goût là ;) Merci Mattharm

Bonsoir (presque bonjour...) J'ai un graphique en histogramme tout bête et j'aimerais que ma cellule J6 qui contient la liste des mois fasse changer dynamiquement mon graphique ! Est ce possible ? Merci d'avance, Mattharm

Bonsoir, J'essaie de mettre une formule dans une cellule via vba.... l1 = 3 Cells(2, 10).Value = Evaluate("nb.jours.ouvres(D" + l1 + " ;E " + l1 + ")" + "") Malheureusement mon incompatibilité de type.... ne me permet pas d'y arriver.. :) Si quelqu'un à une idée je suis preneur ;)...

Bonjour, J'essaie de sélectionner une feuille qui s'appelle "2009" Mais quand je fais : Worksheets(year(now))... ben ça ne fonctionne pas ! Faut il mettre un format particulier ? Merci Mattharm

Bonjour, J'ai réalisé une macro, et j'aimerais pouvoir l'activer depuis le menu. J'aimerais que cette macro soit utilisable dans d'autres classeurs. Donc que mon menu reste "indéfiniment" dans excel et que je puisse appeler ma macro partout. Par contre, aucune idée de "comment on fait ça"...