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.
Bonsoir,
Je rencontre une difficulté pour extraire toutes les données d'une liste (liste de cours) en fonction d'un critère (1 ou vide) pour construire une nouvelle liste.
J'ai obtenu un premier résultat au moyen de fonction DÉCALER, EQUIV et NB.SI mais je sens que je tourne autour du pot. (voir...
Bonjour à toutes et à tous,
Travaillant sur Mac, je ne dispose pas des activeX pour manipuler des images sans VBA.
N'ayant besoin que de l'icône statique d'un sablier, j'ai opté pour une manipulation de la transparence par VBA pour faire "disparaître" ou "apparaître" mon image.
J'ai testé...
Re : modifier une propriété d'une listebox sans passer par une sélection
Bonsoir,
Et merci pour l'inspiration née des échanges…
Sheets("Feuil1").Shapes("List Box 1").ControlFormat.ListFillRange = "eExercices"
A priori cela fonctionne sans passer par une sélection :)
Bonjour à tous,
Je coince sur un détail. Je modifie la propriété "ListFillRange" d'une listebox sans difficulté à partir d'un bout de macro enregistrée :
ActiveSheet.Shapes.Range(Array("List Box 3")).Select
With Selection
.ListFillRange = "eExercices"
.LinkedCell =...
Re : Stocker le nom d'un Shape pour le supprimer plus tard
Merci à vous deux,
J'ai utilisé la fonction de pierrejean pour obtenir :
Sub Macro4()
Dim n As Integer
Dim nombouton As String
ActiveSheet.Buttons.Add(140, 196, 84, 14).Select
For n = ActiveSheet.Shapes.Count...
Re : Stocker le nom d'un Shape pour le supprimer plus tard
Le soucis est que je souhaite le faire par Macro et que le renommage nécessite de connaître au préalable le nom Excel de l'objet :
ActiveSheet.Shapes("Button 123").Name = "MEFapprenti"
Et je ne connais pas le numéro de l'objet qui...
Bonjour à tous,
Pour une petite application, j'ai besoin de créer / supprimer un bouton.
Je parviens à :
Créer le bouton
Modifier son texte en fonction de mes besoins
Positionner le bouton où je le souhaite
Je ne parviens pas à :
Stocker son nom de type "Button 000" dans une...
Re : Tester le contenu d'une variable string issu d'un dialogue "ouverture..." annulé
Malheureusement, cela ne fonctionne pas chez moi. Je travaille sous Mac OS X et j'imagine qu'il y a une subtilité qui m'échappe…
En fait cela fonctionne avec "False" mais dans ce cas, lorsque l'utilisateur...
Bonjour à tous,
Je rencontre un soucis avec un test If dont voici le code :
Option Explicit
Dim chemFic As String
Public Sub selectionFichierAMettreEnForme()
chemFic = Application.GetOpenFilename("XCEL,XLS8")
If chemFic = Null Then 'Si l'utilisateur annule la boîte...
Re : Ranger lignes sans VBA ni Trier
Merci infiniment abcd !
J'ai passé trois jours à tester différentes méthodes et je m'étais persuadé que la solution tournait autour de la fonction RechercheV. Très jolie solution… je mesure les progrès qu'ils me restent à faire. :o
Bonjour à tous,
Je souhaiterais produire un tableau sans lignes vides.
Mon fichier réalise 250 tests sur une feuille de temps de travail.
Un test positif rend 1, un test négatif rend 0.
Une cellule affiche le message associé à chaque test positif et un bouton d'incrémentation permet de...
Re : Lister les occurrences d'une colonne
Merci Boisgontier,
Mais ma version d'Excel pour Macintosh ne dispose pas de la fonction "CreateObject".
Je vais tenter de copier la colonne sur une feuille A, de copier la cellule A1 de la feuille A en A1 d'une feuille B et de supprimer toutes les...
Re : Lister les occurrences d'une colonne
Merci pour vos réponses,
Celle de Monique me va bien car elle n'appelle pas de macro. J'ai un peu peur tout de même de la place que cela va prendre car je dois pouvoir cribler 17 colonnes de 65535 lignes (potentiellement). Avant de crier, je vais...
Bonjour à tous,
Je cherche à lister les occurrences d'une colonne pour présenter le résultat dans une zone de liste modifiable (exactement à la manière du menu déroulant en tête de colonne).
Si quelqu'un sait faire cela, je lui en saurai fort gré.
;)
Re : coller seulement les valeurs
Bonsoir le fil,
Je vais reformuler ma question.
Existe-t-il une solution pour appliquer une option "PasteSpecial Paste:=xlValues"
à la méthode de copie
… .Copy Destination:=… ?
Re : coller seulement les valeurs
Merci ChTi160,
Ça va alléger mon code mais mon problème initial était de réaliser une copie des valeurs et non des formules contenues dans les cellules en fait…;)
Re : coller seulement les valeurs
Merci bhbh,
mais cette solution ne me copie que la première cellule de mon tableau de 5 éléments.
Pour phlaurent55,
c'est le début de ma macro. Pour le moment elle ne comprend qu'une sélection de 5 éléments mais elle est appelée à en manipuler beaucoup...
Bonjour le forum,
J'utilise la macro suivante pour extraire les données d'un fichier.
Public Sub TransfertDonnees()
acopier = Array("G8:G12")
For i = 1 To 52
vers = Array("B" & 2 + ((i - 1) * 7))
For n = 0 To...
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.