Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour,
J'ai de la difficulté a figurer l'écriture d'un code.
Prenons l'exemple simplifier suivant :
Nous avons une feuille de papier blanche de dimension 8.5" x 11"
Nous avons aussi plusieurs bandes papier de couleur jaune de dimensions :
Bande #1 = 8.5" x 2"
Bande #2 = 8.5" x 3"
Bande #3 =...
Bonjour,
J'ai crée un code qui fonctionne comme je le veux mais il est très lent. Je pense que je devrais crée une loop dedans pour le simplifier mais je ne voit pas comment faire.
Merci !
Voici le code en question :
Public Sub Worksheet_Change(ByVal Target As Range)...
Bonjour,
J'ai enfin réussi a faire fonctionner mon code parcontre, il est laid et long.
J'aimerais le simplifier quelque peu avec votre aide !
Merci
Sub PDF_Import()
On Error GoTo Fin
Dim Able2ExtracPath As String
Dim PathAndFileName As String
Dim ShellPathName As String
With...
Bonjour,
J'ai définie une plage de donné "Plage_Compos" (qui peut varier) qui ne contient que 2 lignes (dans mon exemple) mais quand j'utilise ce code :
Compos_3 = .Range("Plage_Compos").Cells(3, 1) 'Compos_3
Il me renvoie à la 3e ligne qui n'est plus dans ma plage définie.
Que faire...
Bonjour,
J'ai le code d'erreur 91 et je ne comprend pas pourquoi.
Sub Autofill()
Dim Compos_1 As String
Dim Compos_2 As String
Dim Début_Ligne As Long
Dim Début_Colonne As Long
Dim Fin_Ligne As Long
Dim Fin_Colonne As Long
Dim Plage_Compos As Range
With Worksheets("Cost...
Bonjour,
J'aimerais créer un évènement personnalisé.
Soit lorsque j'ajoute une feuille (Feuille de temps) a mon classeur de sommaire (cette nouvelle feuille provient d'un autre classeur que je drag and drop + crtl dans le classeur) que sur la feuille sommaire certaine cellule se remplissent en...
Bonjour, j'ai crée ce code et il fonctionne comme je le veux.
Par contre, j'obtiens un délais d'affiche.
Je pense que ce code pourrait être simplifier pour accélérer l'exécution de celui-ci.
Merci
Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
With Worksheets("Estimation...
Bonjour,
J'ai un ficher Excel me permettant d'afficher et de masquer des lignes en VBA suivant différentes cases à cocher.
J'aimerais créer une arborescence au lieu des case a cocher.
Voici la structure de l'arbre
1) Ensemble de murs
2) Isolation
3) Option murs
3.1) Vis SDS
3.2) Membrane...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.