Résultats de la recherche

Bonjour, J'ai un problème avec une fonction que j'ai créé. La voici : Sub Mef() ActiveSheet.PageSetup.Orientation = xlLandscape ActiveSheet.PageSetup.Draft = False ActiveSheet.PageSetup.PaperSize = xlPaperA3 ActiveSheet.PageSetup.Zoom = 100...

Bonjour, Je souhaiterais réaliser un graphique à partir de données Excel or je n'arrive pas à avoir ce que je souhaiterais. je vais mettre un fichier en enlevant les données confidentielles en pièce jointe. Je souhaiterais avoir un graphique des 12 mois avec pour chaque "série" 2...

Bonjour, j'aurais besoin de vos conseils dans le but d'optimiser ma macro. Alors j'ai 2 fichiers excel qui ont tous les deux, 2 onglets. Pour chaque fichier, et chaque onglet je lance ma macro tour à tour. c'est une histoire de mise en forme fichier d'origine : codeart l cajanv...

Re bonjour tout le monde!!! Voila j'exporte une feuille dans un autre classeur, mais le problème c'est qu'en l'exportant, j'exporte les boutons qui sont sur cette feuille, et les macros qui y sont attaché, c'est assez ennuyeux. Est-il possible d'exporter la feuille sans boutons et sans macros...

Bonjour tout le monde!!! Après un long week-end, me voici d'attaque. J'ai ceci: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Workbooks('futur_FDP.xls').Close SaveChanges:=False End Sub Mais en faite cela me premet biend e ne pas sauvegarder mais ça me...

Bonjour tout le monde!! Je viens d'apprendre que cela : Application.ScreenUpdating = False cachait les traitements. Mais comment l'utilise t-on? Où faut-il le mettre? quand? et on le laisse toujours à false? Je vous remercie d'avance pour ces explications. :o

Re bonjour, Petit souci, est-il possible avec un on error goto de stopper tout simplement la macro. erreur: Exit sub mais ca arrête seulement ce module alors que moi je veux que ca arrête complètement de tourner. Est ce possible? Merci d'avance

Bonjour tout le monde !! ;) Voila je me demandais s'il etait possible dans une boucle de lui dire de passer au sivant sans executer la suite du code. Sans faire de variable intermédiaire avec un Si. For i= 1 to 10 bla bla si bla = blabla then remonter au for avec i=i+1 end if suite du...

Re Bonjour, Suite à mon dernier fil, qui m'a permis de faire fonctionner blablabla. Depuis je ne peux plus enregistrer, a chaque fois il me met 'Document non enregistré'. Ya pas de limite j'espère? Je sais plus quoi faire :( . Merci pour votre aide d'avance.

Vala je me décide enfin à me présenter! J'espère que vous allez tous bien!! Donc je suis une jeune étudiante, j'ai découvert le forum il y a quelque temps déjà, car je suis en stage, et bien sur je developpe àpartir de VBA et mon projet se réalise sur Excel. En tout cas, j'avais encore...

Bonjour tout le monde!!! Ne trouvant pas de solution sur mon dernier fil, je relance avec une autre idée. En faite j'aimerais savoir s'il est possible d'enregistrer une feuille dans un autre classeur au lieu de faire une copie. J'aimerais que la feuille s'enregistre dans un autre classeur...

Bonjour tout le monde !! ;) Voila j'ai un petit souci dans l'export d'une feuille: semweek = Range('weeksem') Application.DisplayAlerts = False Workbooks.Open Filename:='F:/classeur1.xls' Var = 'weekend' & '(' & semweek & ')' Windows('classeur1.xls').Activate For Each Ws In...

Re bonjour, Décidemment je ne m'en sors plus. If InStr(1, nom, '.') > 0 Then mavar = Left((nom), Len((nom)) - 2) Sheets(nomfeuille2).Cells(dl2, 3) = mavar Else Sheets(nomfeuille2).Cells(dl2, 3) = nom End If Voici mon petit bout de code qui me permet de répérer s'il y a un point dans...

Bonjour tout le monde!! :) Je voudrais savoir s'il est possible de tecter un point dans un mot. Par exemple XXXX.Y J'aimerais faire s'il y a un point dans le mot on enlève les 2 dernières lettres. Pour enlever les 2 dernières lettres j'ai ceci: mavar = Mid(nom, 1, Len(nom) - 2) Mais...

Bonjour tout le monde, Et oui, je viens encore mes requêtes :unsure: Je fais une requête INSERT into, quand je met des valeurs ca marche mais quand c'est des variables pas contant. Quand c'est des variables integer ca passe, mais alors string ça passe pas du tout snif. v_strsql = 'INSERT...

Re, Voilà j'ai un petit souci, j'ai nommée une zone dans une feuille, je m'en sers dan smon code: Set plageCherche2 = Range('zonedouble') valcherchée2 = nompr & ' ' & 'en double' For Each Item In plageCherche2 If Item.Value = valcherchée2 Then compteur2 = compteur2 + 1 Next...

Re BOnjour tout le monde! ;) Voila j'ai une feuille nommé week end, qui est faite toute les semaine à partir d'un classeur, j'aimerais lorque l'utilisateur le demande il sauvegarde cette feuille dans un autre classeur. Mais il peut revenir sur cette feuille et dans ce cas, il faut que cela...

Bonjour tout le monde ;) Dans mon fichier je me retrouve avec des noms DUPOND.L et j'aimerais juste récupérer le nom dans une variable en VBA donc enlever les deux dernière lettres. Il me semble qu'il y a une fonction LEFT mais je n'y arrive pas car il faut le ssuppriemr et garder juste le...

Re bonjour tout le monde :) j'ai besoin de vos conseils aunsi que de votre aide. J'ai un fichier lundi | mardi | mercredi X | V | N Y | S | U X,V,N... sont les noms de personnes. Il faut par exemple que X ne soit pas dans mardi ni dans mercredi, et qu'il...

Bonjour à tous !!! :) J'aimerais que lors de l'impression, les boutons ne s'affichent pas est ce possible? sans faire de zone d'impression. Merci d'avance :o