Contenu récent par Nain porte quoi

Hello, derniereLigne = Cells(Rows.Count, "L").End(xlUp).Row permet de connaitre le numéro de ligne CONTENANT une donnée, une couleur n'est pas une donnée ! Question, plus concrètement, vous voulez faire quoi ? Parce que Rows(i).Select dans une boucle ne va sélectionner qu'une seule ligne

Hello, oui avec la propriété Visible MultiPage1.Pages(2).Visible = Faux et le Faux peut venir d'une condition IF par exemple

Hello, Private Sub UserForm_Activate() Nom_ComboBox.DropDown End Sub

@JHA ah ben oui, pourquoi je voulais utiliser les données de l'autre classeur pour la MFC... qu'elle idée :confused:

Hello, vos classeurs ne sont pas très significatifs, pourriez vous mettre des exemples de ce que vous voulez ? D'autre part, il n'est pas possible d'utiliser une référence d'un autre classeur dans une MFC y'en a qui ont essayé (moi) et ils ont eues des problèmes 😇

Hello, pour éviter le splash screen d'Excel il faut ajouter /e dans le raccourci, donc ça devrait donner

OK, c'est clair, merci pour la démo. J'aurais cru que le fait de mettre "" (rien) dans une cellule était différent de la vider avec ClearContents

Hello, comme on ne sais pas d'où proviennent "1" et "A1" ça donne ça =SOMME.SI.ENS(Base!E2:E31;Base!B2:B31;1;Base!D2:D31;"A1") edit : oups, pas vu la solution de ALS35 Sous forme de tableau structurée c'est plus parlant =SOMME.SI.ENS(Tableau1[Heures];Tableau1[Semaine];1;Tableau1[Référence];"A1")

Hello sylvanu et job75, vous avez tous les 2 utilisé Est-ce qu'il y a une différence avec Range(C.Address).ClearContents ?

Hello, une version sans besoin de la gestion d'erreur Sub Cherche_Feuilles() Dim Feuille As Worksheet Dim Nb_Feuille_Trouve As Integer Dim i As Long Const fichieR as string = "Nom_du_fichier.xlsx" Set classeur = Application.Workbooks.Open(fichieR)...

Je suis tout a fait détendu, c'est vous qui semblez ne pas l'être ;) Vous vous attaquez à du VBA sans avoir (semble t'il) les notions de bases (c'est risqué) et avec un code provenant d'on ne sais où et pas écrit dans les règles de l'art. Patrick vous propose de tout refaire, ça va détendre le...

Je n'ai pas été assez clair ? Option Explicit VEUX que vous déclariez TOUTES les variables utilisées. Liste est une variable mais il n'y a aucune déclaration comme Dim Liste As String et c'est à faire pour chaque variables. C'est plus clair ?

Hello, Option Explicit OBLIGE à déclarer TOUTES les variables, c'est une très bonne habitude à prendre car il est facile de se planter dans un nom de variable

Hello, la solution de goube (hello) est la bonne, en voici une autre en VBA Le but et d'annuler la dernière opération s'il y a eue un changement dans les colonne D à F Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("D:F")) Is Nothing Then...

Pas vu le fichier