Résultats de la recherche

bonjour, J'aimerais faire une palette de couleurs dans un tableau 7 x 8 où dans chaque cellule il y aurais en fond la couleur et écrit la valeur de colorindex. je narrive pas à faire que lorsque qu'il arrive à la 7eme ligne, il commence la colonne 2 à la première ligne... Meric de votre...

Bonjour: nfOuvrage.Origine.Offset(, infOuvrage.posxInfoSup).Value = infOuvrage.InfoSup J'aimerias agir sur la police de cette .Value j'ai essayé de fair eun with avec .font.size mais ça ne fonctionne pas. merci :D

bonjour! Dans mon script j'ai un moment: Feuil1.Range("G53:IV65,G71:IV85").Clear j'aimerias qqch d'identique mais sans que ça supprime mes bordures... Merci de votre aide

bonjour amis xldien. J'ai une pettie question: Comment intégrer un nom de variable la dedans: With Origine.Parent.Shapes.AddShape(msoShapeRectangle, Origine.Left + (posDeb * Echelle), Origine.Top, Longueur * Echelle, 3) j'ai une variable string qui s'appelle cote If .Range("O" &...

Bonjour, je viens à nouveau solliciter votre aide. J'ai un petit outils de recherche, qui fait des recherche par colonne. Dans ma colonne j'ai des libellés qui sont composés de la même chose.(c'est pas très claire mais vous comprendrez en regardant le fichier). et lorsque que je tape une...

Bonjour xldien, je dois affecter un format a toute une série de cellule séparée par 4 colonnes. Existe t il un petit script pour sélectionner une cellule toutes les 5 colonnes. Merci!

Bonjour, Au début de mon projet j'avais 2feuilles, maintenant j'en ai 3... voici le code qu'il ya sur une: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim Cellule As Range If Target.Column = 3 Then If Target.Value <> "" Then...

Bonjour, j'ai un tableau qui contient une colonne avec des numéros, un colonne qui fait référence à des cellules d' autres fichiers qui portent toujours le même nom sauf avec un chiffre différent, ce chiffre correspond à celui qu'il ya dans la colonne "chiffres"... je voudrais pouvoir mettre...

Bonjour, J'ai un défi assez intéressant: Comme vous allez le voir dans le fichier j'ai des ouvrages(ponts, tunnels, galerieS) qu'il faudrait placer dans un tableau par vba. Le programme devrait: 1. calculer la longueur de l'ouvrage(km fin-km début)(=longeur du rectangle) 2. Calculer...

Bonjour, j'aimerias que l'orsque que la cellule est sélectionnée , toute la ligne se sélectionne... Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 'atteindre l'ouvrage en double cliquant If Not Intersect([D34:BR69], Target) Is Nothing And Target <> ""...

j'ai fais une fonction pour afficher/masquer des connecteurs en fonction de leur couleur. tout fonctionne bien à part pour le dernier qui masque/affiche plusieurs type de formes automatiques...pourtant pas de la même couleur:confused: Je suis à bout...c'est incompréhensible 'fonction pour...

Bonjour, J'ai inséré un pdf dans un fichier excel(ole: insértion, objet, créer à partir d'un fichier). le pdf de base est de très bonne qualité mais lorsque je l'insère, il devient pas tètè... Ya t'il une solution, avoir un résolution encore plus grande réglerait le problème?? MERci

Bonjour, j'aimerais des checkbox pour faire apparaître disparaître des petits ronds(oval en vba je crois) en fonction de leur couleur, j'ai un script mais il fait disparaître toutes les formes sauf oval. ub AfficheDot(CodeCoul%) Dim t As Object For Each t In Feuil1.Shapes If t.Name Like...

Bonjour, A nouveau je veins solliciter votre génie qui déjà à de nombreuse fois m'a sauver. Alors voilà dans mon projet je double clique sur une cellule de mon tableau, ça me redirectionne vers un autre tableau feuil2 dans la cellule qui a le même libellé. maintenant j'aimerais que...

Bonjour, Voilà mon but: j'ai un tableau avec différents objets dans des cellules qui on chacun un commentaire, tous les commenaitres contiennent le même type d'informations(un code et un nom), jaimerais que les commentaires se "remplissent" tout seul à la manière de: objet1>>fait une...

bonjour, Private Sub TextBox1_Change() Dim rngTrouve As Range Dim strChaine As String strChaine = TextBox1.Value Set rngTrouve = ActiveSheet.Columns(1).Cells.Find(what:=strChaine) If rngTrouve Is Nothing Then MsgBox "Pas trouvé" Else Cells.Find(what:=strChaine).Activate End If...

Bonjour, je viens soliciter votre aide salvatrice! J'aimerais afficher un commentaire à un endroit ou à un autre en fonction de la valeur d'une cellule. voyer plustôt: Private Sub commentaire() If Cells(7, 6).Value = 1 Then Worksheets(2).Range("D25").comment.Text ("Bonjour") Else...

IDs, ou numéros de formes automatiques? Bonjour,après avoir trouvé des réponses très satisfaisantes sur ce forum fort util, je me permet d'en poser une seconde. J'ai des formes automatiques de couleurs différentes, je fais des boutons pour les faire apparaître /disparaître. Le script...

bonjour, J'ai une ligne kilométrique, et j'aimerais pouvoir taper les kilomètre dans une cellule et que je sois "amener" à la zone correspondante. http://www.casimages.com/img.php?i=09070707113391011.jpg voilà un schéma merci edit dsl pour l'image

Bonjour, J'ai un grande feuille de calcule avec des formules et des cellules de saisie. Maintenant j'aimerais supprimer tout le contenu des cellules de saisie mais pas supprimer les formule pour que je n'aie plus qu'à ressaisir des valeurs. Merci d'avance