Résultats de la recherche

Salut @cp4, @Excellerateur, si vous devez quoi qu'il arrive utiliser VBA, je vous conseille fortement de prendre en base le code proposé par cp4.

Bonjour à tous, @Excellerateur, sommeprod est une formule assez simple Sommeprod((Colonne 1= critère 1) x (Colonne 2= critère 2) ....... x Colonne_à _calculer) Je t'invite à consulter les différents tutos disponibles. Dans ton exemple j'ai renommé les différentes colonnes utilisées :

Ci-joint un nouveau test

Bonjour à tous, Peut-être une solution : ActiveSheet.Shapes("Button 1").Top = ActiveCell.Top ActiveSheet.Shapes("Button 1").Left = ActiveCell.Left

Bonjour à tous, @Staple1600, malheureusement beaucoup ne comprennent pas l'esprit du forum.

Bonjour à tous, @Quicksland, ci-joint un essai

Bonjour à tous, Il s’agit d’une variable déclarée en tant qu’objet notamment pour permettre le traitement du fichier à uploader. Mais je viens de comprendre que tu souhaites uniquement créer des répertoires. Peut-être la solution en suivant ce lien

Peut-être que c'est mieux là (cf.PJ) Par contre, pour optimiser les temps d'exécution de la macro vous pouvez essayer le code suivant : Application.ScreenUpdating = false '''''''Exécution code Application.ScreenUpdating = true

Bonjour à tous, @Forcené des pb informatiq c'est pas très claire mais ci-dessous un début solution pour ce que j'ai compris Sub UploadToSharepoint() Dim SharepointAddress As String Dim LocalAddress As String Dim FS As Object SharepointAddress =...

Bonjour à tous, Un essai en PJ

Bonjour à tous, Un début pour générer vos fichiers : Sub Test() Dim EOL, T As Integer Dim Flx As String Dim intFic As Integer EOL = Feuil2.Range("A" & Rows.Count).End(xlUp).Row For Each cell In Feuil2.Range("A1:A" & EOL) If cell.Value <> "" Then T = T + 1 Flx = "C:\TEST\Fichier " & T &...

Bonjour à tous, @KARINE972 , peut-être en commençant vos recherches dans la section téléchargement dédiée : https://excel-downloads.com/search/4127028/?q=co%C3%BBt&t=resource&o=relevance

Bonjour à tous, Ci-joint un test.

Bonjour à tous, Avec la formule ci-dessous en renommant les colonnes concernées (Type, couleur, Total) =SOMMEPROD((TYPE=F11)*(COULEUR=G11)*TOTAL)

@dysorthographie merci beaucoup d'avoir pris le temps de commenter ton code. Je vais maintenant m'atteler à le comprendre en profondeur. Je reviens très certainement avec de nouvelles questions ;)

@dysorthographie merci beaucoup c'est que je cherchais à faire. On en apprend tous les jours je pensais qu'il était impossible d'utiliser du SQL sans passer par une base de données physique. Pour stp m'aider dans l'ingestion du code en m'éclairer sur le sens des lignes ci-dessous ...

Bonsoir à tous, @dysorthographie merci beaucoup pour ta propopsition c'est puissant Par contre, pour le fichier test joint je devrais arriver au résulat ci-dessous, les sommes totaux sont différents

Bonsoir à tous, @fanfan38, @patricktoulon merci pour vos interventions. Je viens d'enregistrer la macro de conversion et obtiens le fichier joint. Sub Transformation() Columns("A:A").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _...

Merci fanfan, mais je voulais automatiser le process en VBA

Bonjour à tous, J'essaye sans succès de retravailler un fichier d'import au format texte. Le fichier texte joint a titre d'exemple est éclatée en plusieurs lignes de même nature je souhaiterai pouvoir out synthétiser en 4 lignes en effectuer la sommes des montants pour chaque ligne de même...