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.
Voici le code complet pour le partage :
Public Exonic_Id As Integer
Sub Decoupe_OM_Click()
Dim exonic_pdf As Integer
Dim strNomDossier As String
Dim chemin As String
'----------Création/vérification dossier Split--------------------
chemin =...
Bonjour à la communauté.
Voici une macro pour lancer une application PDF.
Sub bouton_decoupe_pdf_Click()
Dim exonic_pdf As Integer
Dim strNomDossier As String
Dim chemin As String
chemin = CreateObject("WScript.Shell").specialFolders("Desktop")
strNomDossier = chemin & "\Split\"
strNomDossier =...
Bon au final, je suis allé à cela :
Sub searchaploc()
Dim searchdate As Range
Dim ligne_vide_dataff
Dim datestrg, valeur_cherche As String
Dim u, u2 As Long
datestrg = Sheets("AP locales-autres plans").Cells(503, 1).value 'valeur à chercher
last_cel =...
Voici le code que j'utilise.
Sub searchaploc()
Sub searchaploc()
Dim searchdate As Range
Dim ligne_vide_dataff As Variant
Dim datestrg As String
Dim u, v, u2, v2
Dim i As Integer
With Sheets("Data2").Range("B2:B6000")
Sheets("AP...
Tout doit être codé, dans le fichier original, il faut cliquer sur des cellules contenant des dates et afficher dans une listbox, tous les résultats pour cette date présentent dans la feuille data
Bonjour,
Voici mon problème :
J'ai une feuille où sont stockées des données par dates et pour une même date il peut y avoir plusieurs saisies.
Je dois les récupérer (data) et les afficher dans une autre feuille(aff_data_tri).
J'ai essayé avec le code suivant et il fonctionne pour ligne ...
Bonjour,
Je dois trouver des plages de cellules bien précises lorsque l'on clique sur la feuille.
Il y a 11 colonnes et 120 lignes réparties sur 8 plages. Cela fait 88 arguments dans le array et cela ne passe pas
Je dépasse le nombre d'argument dans un tableau ou alors je pense qu'il est mal...
Bonjour,
Je souhaiterai qu'à l'ouverture du classeur,
- Pas de ruban.
- Pas de référence ligne et colonne
- Une plage de cellules visible ou pas d'ascenseurs.
Merci d'avance
J'ai trouvé la solution qui a consisté à convertir la plage de données en variables utilisables dans
.Range (Cells(a, b), Cells(c, d)) et qui fonctionne avec le tri.
Pour obtenir a, b, c, d, j'ai transformé la plage de données identifiée précédemment et que j'ai écrit en dur dans une cellule.
Super cela marche nickel et la dernière solution de @Dranreb me permets de saisir toutes les plages aisément.
La variable plage_trouve est en public et je n'arrive pas à la passer à un module où se trouve une macro de tri.
Je dois trier chaque plage saisie...