Bonjour,
Voilà un bout de code, j'espère que ça aidera:
Private Sub ma_procedure()
Dim myRange As Excel.Range
Set myRange = ActiveWorkSheet.Range("E3")
If myRange.Value =...
Type: Messages; Utilisateur: Ariaar
Bonjour,
Voilà un bout de code, j'espère que ça aidera:
Private Sub ma_procedure()
Dim myRange As Excel.Range
Set myRange = ActiveWorkSheet.Range("E3")
If myRange.Value =...
Bon, finalement j'ai trouvé une solution.
Je rajoute la référence Microsoft Excel XX.X Object Library et j'appelle
Excel.Application.GetOpenFilename
Bonjour à tous,
Je voulais savoir jusqu'où pouvait aller l'optimisation des blocs With ... End With en VBA.
Je les utilise actuellement en en plaçant un quasiment en début de fonction et en le...
OK, si tu essayes autre chose et que ça ne marche pas, poste le code et j'essaierais de le corriger ;)
J'avais trouvé ce code sur le net, et il précisait qu'il faisait appel à une fonction ou un DLL qui n'était plus présent sur Windows 7.
Tu peux poster le code que tu as essayé d'intégrer?
Bonjour,
Je suis récemment passé sous Windows 7, et le code que j'utilisais sous XP pour ouvrir une boîte de dialogue permettant de sélectionner un fichier ne marche plus:
Private Sub...
Pour que les ComboBoxs soient "dépendantes", il te suffit de changer leur contenu dans ComboBox1_Change(), en faisant la même chose que sur ListBox1
Lol, bah teste le code et surtout oublie pas de marquer le poste comme résolu si ça marche :)
Si ça marche pas, cette fois il va me falloir un peu plus de détails parce que j'ai absolument aucune...
Alors c'est ton jour de chance parce que ça fonctionne quasiment de la même manière ;)
Je reprends l'exemple des associations et des villes, dans ListBox1 et ListBox 2.
' Initialisation du UserForm
Private Sub UserForm_Initialize()
' ici tu reprends le code que je t'ai donné...
Bonjour,
Il te suffit de parcourir toutes les cellules de ta plage et d'incrémenter un compteur si la couleur de ta cellule est jaune.
Dim myCell as Excel.Range
Dim nbYellowCells as Integer
...
Ah, tu peux afficher les différentes feuilles en sélectionnant Affichage > Sauts de page :)
Si tu veux qu'une recherche soit générée à chaque fois que l'utilisateur fait un choix dans une de tes liste déroulantes, il te suffit d'effectuer les recherches/modifications sur le champs où sont...
Alors soit tu as une plage nommée et l'avantage c'est qu'elle sera dynamique, sinon c'est à toi de récupérer les bons paramètres dans ta base de données.
Un peu de code pour te guider;) :
Pour initialiser tes ListBoxs, si c'est en fonction d'une recherche
Private Sub UserForm_Initialize()
Dim myRange As excel.Range
' Utilisation de...
Bonjour Bobslebreton,
J'ai une solution, certes peu élégante, mais qui pourrait t'aider à résoudre ton problème.
Dans Fichier > Mise en page, tu choisis dans Taille de page une grande taille et...
Bonjour Marc31,
Tu devrais tout d'abord jeter un coup d'oeuil sur cet (excellent) tutoriel:
http://silkyroad.developpez.com/VBA/UserForm/
Sinon, tu devrais sûrement utiliser les fonctions...
Et quels sont tes paramètres? Es-tu sûr qu'ils ne grossissent pas à chaque appel?
Oui, c'est exactement ce que je recherchais! Merci beaucoup!
Je ne connaissais pas la propriété Cells de Worksheet, je passais toujours pas Range et je trimbalais des formules super longues pour...
Bonjour patricktoulon,
Je ne souhaite pas récupérer une plage mais une cellule.
J'ai du mal m'exprimer sur mon premier message donc je reprends.
J'ai trois cellules:
myRange, a qui je...
Bonjour,
La seule optimisation que je vois est sur ces deux lignes:
WDerniereLigne = ActiveCell.SpecialCells(xlLastCell).Row
WDerniereLigne = WDerniereLigne + 1
Que tu pourrais fusionner:
...
Si quelqu'un a une solution je suis toujours intéressé...
Bonjour à tous,
Je souhaiterais récupérer une cellule dans une objet Excel.Range à partir de la ligne d'une cellule et de la colonne d'une autre cellule, les deux étant stocké dans des objets...
Salut Bobslebreton,
J'utilise actuellement la version 2007 de Visio, et j'ai jamais entendu parler de ces étiquettes. Est-ce une nouveauté de 2010?
Si c'est le cas, il doit peut-être exister un...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.