Résultats de la recherche

Bonjour, Je ne sais pas si c'est possible, je demande votre aide. J'ai une liste déroulante, avec les valeurs 1, 2 et 3. J'ai également 3 feuilles, nommées 1,2,3. Dans une feuille, j'ai une image liée (j'ai fait copié/collage spéciale -> image liée), quand on clique sur cette image, j'ai la...

Bonjour, J'ai une macro qui me permet d'ajuster la hauteur des cellules : Sub Ajuster() Dim c As Range For Each c In Range("aa70:aa80").Cells Select Case c.Value Case 1 To 15: c.RowHeight = 15 * c End Select Next c End Sub Quand je change une valeur dans "AA70:AA80", cela...

Bonjour, Etant débutant, je vous demande votre aide. J'ai une macro pour retirer 1 à chaque fois que je lance la macro. Sub moins_un() Dim moins_un As Integer For i = 1 To 1 moins_un = Cells(3, 24) - i Cells(3, 24) = moins_un Next i End...

Bonjour, Je souhaite ajuster la hauteur des lignes avec une macro : Si dans la colonne A la valeur est = 1, alors la hauteur de la ligne sera égale à 15. Si dans la colonne A la valeur est = 2, alors la hauteur de la ligne sera égale à 30. Si dans la colonne A la valeur est = 3, alors la...

Bonjour, Je suis en train de faire un planning de gantt sur Excel mais je n'arrive pas à inclure les congés. Dans la colonne C, j'ai la date de début d'une tache. Dans la colonne D, la durée en jours ouvrés. Dans la colonne E, je souhaite afficher la date de fin. Dans la colonne K et L, je...

Bonjour à tous, J'ai récupéré un fichier pour faire un planning de Gantt facilement, je l'ai modifié suivant mes besoins mais étant débutant, je bloque sur 2 points. J'aimerai faire les 2 choses suivantes : - Ne pas afficher les colonnes si dans la ligne on a "S" ou "D". En faite, je souhaite...

Bonjour à tous, Etant débutant, je vous demande votre aide. Dans un dossier sur mon ordinateur, j'ai à la racine un fichier excel type. Dans ce même dossier, j'ai un sous-dossier "Images". Dans mon fichier excel type, je souhaite afficher les 4 dernières images qui on été ajoutées dans le...

Bonjour à tous, J'ai besoin de rechercher des valeurs pour faire une analyse rapide de ma comptabilité. Je joins un fichier pour exemple : Dans la colonne A, j'ai le code d'une affaire (ce code commence toujours par un T), dans le fichier, il s'agit des cellules en jaune Dans la colonne A...

Bonjour, J'ai créé une macro pour faire les choses suivantes : - Je sélectionne la colonne B et je la copie dans la colonne A - Ensuite, dans la colonne B, je retire 1 à toutes les valeurs Actuellement, cela me fait ce principe sur les lignes 9 à 100. J'aimerai modifier mon code pour que...

Bonjour à tous, Etant complément débutant en VBA, je demande votre aide. J'ai trouvé une macro pour remplacer les cellules vide par une valeur : Sub CelluleVide() Dim plage As Range Set plage = [E9:E3000] For Each cell In plage If IsEmpty(cell) Then cell.Value =...

Bonjour, Je bloque sur mon code VBA. J'ai créé une macro pour imprimer seulement certaines lignes (les lignes avec la valeur 0 dans la colonne "n" ne sont pas imprimées) : Sub ImprimeSansVide() Dim Plage As Range On Error Resume Next Application.ScreenUpdating = False With ActiveSheet...

Bonjour, Etant débutant en VBA, je demande votre aide. Dans un tableau, j'ai 2 colonnes : Colonne B, avec des valeurs Colonne D, avec du texte Si dans une ou plusieurs cellules de la colonne D il y a un texte comportant le mot "Remise", alors j'aimerai que dans la colonne B, la valeur de la...

Bonjour, Je dispose d'un code VBA pour imprimer seulement mes lignes actives Sub Imprimdevis() Dim Plage As Range On Error Resume Next Application.ScreenUpdating = False With ActiveSheet Set Plage = .Range("ap1:ap318") For Each CEL In Plage If CEL.Value = 0 Then...

Bonjour à tous, Etant débutant, je bloque sur un code VBA. Dans une feuille, j'ai 3 tableaux : Tableau 1 : de B3 à C23 Tableau 2 : de B25 à C45 Tableau 3 : de B47 à C67 J'aimerai créer 3 boutons, 1 par tableau. J'aimerai que le bouton 1 permet de copier la dernière ligne (donc la n°23) et...

Bonjour, Je dispose d'un fichier maitre et plusieurs fichiers esclaves. Dans mon fichier maitre, j'ai fait des liaisons pour récupérer les données des fichiers escalves. Par contre, dans mon fichier maitre, j'ai dans ma cellule B6 par exemple, cette formule ='Z:\DosCommuns\[Bilan...

Bonjour, J'ai trouvé une macro pour ne pas imprimer les lignes vide : Sub ImprimeSansVide() Dim Plage As Range On Error Resume Next Application.ScreenUpdating = False With ActiveSheet Set Plage = .Range("B1:B1002").Cells.SpecialCells(xlCellTypeBlanks) If Not Plage Is Nothing Then...

Bonjour, Je souhaite créer un bouton pour activer/désactiver les calculs automatiques car j'ai un fichier assez lourd. Je souhaite que quand je clique sur le bouton, cela active les calculs manuels et cela change le titre du bouton. Si je reclique sur ce même bouton, cela active les calculs...

Bonjour, J'utilise un macro pour ajuster la hauteur des lignes d'une feuille: Dim Ligne As Range Application.ScreenUpdating = False With ActiveSheet For Each Ligne In .Rows("5:200") Ligne.AutoFit Ligne.WrapText = True Ligne.RowHeight =...

Bonjour, Etant débutant, je bloque sur quelque chose de simple je pense. Je joins mon fichier car je pense que je vais avoir du mal à expliquer. J'aimerai faire un copié/coller des cellules vertes pour les copier en dessous (le résultat souhaité est les cellules jaunes). J'aimerai que les...

Bonjour, Etant débutant, je bloque sur un point qui je pense n'est pas si simple. J'ai une liste composée avec des Titres (en gras), de budgets d'heures (en rouge) et de fournitures (en vert). Imaginons que ma liste est composé comme cela : Poste n°1, je n'ai pas d'heures ni d'achats Poste...