l

Jeune membre

Inscrit le :26/05/2016
Dernière activité :19/06/2017 à 12:03
Version d'Excel :2013 EN
Messages
31
Votes
0
Fichiers
0
Téléchargements
0
SujetsMessagesStatistiquesVotes reçus

Sujets créés par lenovic

DateForumSujetExtrait du message
14/06/2017 à 23:37Excel - VBA Temps d'arrêt au changement d'équipeJe vous joint un extrait du fichier que j'obtiens quotidiennement concernant des datas de production. L'heure à laquelle une pièce est produite est enregistrée feuille 1 colonne C. Je souhaite faire une estimation du temps d'arrêt au changement d'équipe de 6h, 14h et 22h. L'idée est par exemple de f...
12/05/2017 à 15:49Excel - VBA Comptage de valeursJe cherche à énumérer l'ensemble des défauts d'une production. Chaque défaut à un code. Lorsque ce code est 1, la pièce est bonne. Lorsque ce code est différent de 1, je veux compter combien de fois chaque défaut apparaît. Dans le fichier que je joint, il y a trois codes défauts : 137; 17 et 31, mai...
10/05/2017 à 12:55Excel - VBA Extraire une valeur sur un nombre de ligne indéterminéJe vous joint un extrait du fichier excel sur lequel je travaille. Sur la première feuille, l'ensemble des données de production d'une journée. La colonne G concerne l'heure (heure-minute-seconde) à laquelle a été produite la pièce. Je souhaite extraire la donnée heure de cette colonne pour chacune...
05/10/2016 à 17:00Excel - VBA Conservation mise en page- Excel vers WordJe copie un tableau depuis Excel Je le colle dans un nouveau Word. Le tableau est alors trop grand donc je l'adapte à Word. Mais la mise en page est alors changée. Comment puis-je faire ? Set AppWord = New Word.Application AppWord.Visible = True Set DocWord = AppWord.Documents.Add Worksheets(2).Rang...
04/10/2016 à 15:08Excel - VBA Coller un tableau Excel dans un word à une page désiréeEst-t-il possible de sélectionner depuis Excel le numéro de la page d'un Word (la page 2) tout juste créé pour y coller des données? Dim DocWord As Word.Document Dim AppWord As Word.Application Set AppWord = New Word.Application AppWord.Visible = True Set DocWord = AppWord.Documents.Add Worksheets(2...
19/07/2016 à 15:52Excel - VBA ContrôlecalendrierDès la création d'un contrôle de calendrier, il est possible de travailler sur l'ensemble des dates comprises entre l'année 1900 et 2100. Est-il possible de restreindre le calendrier à la seule année 2016 ? Merci --> avec un DTPicker c'est possible...
22/06/2016 à 13:45Excel - VBA Première cellule vide sur une plage de celluleActiveSheet.Cells(Rows.Count, 2).End(xlUp)(2).Value = ThisWorkbook.Sheets(2).Range("C3").Value me permet d'entrer ma valeur après la dernière cellule pleine d'une colonne Cependant, je souhaiterai entrer ma valeur après la dernière cellule pleine d'une plage de cellule de la colonne. je souhaiterai...
21/06/2016 à 16:11Excel - VBA Sélectionner feuille d'un classeurJe souhaite enregistrer des données dans un classeur en fonction de la semaine de l'année. Les feuilles de mon classeur sont nommées du numéro de la semaine. Aujourd'hui c'est donc la feuille 25 Dim NumSem As Byte NumSem = DatePart("ww", Date, 2, 2) me permet de récupérer le numéro de la semaine act...
16/06/2016 à 16:06Excel - VBASupprimer des lignes en fonction de la valeur d'une celluleJe souhaite supprimer des lignes en fonction de la valeur d'une cellule sur cette ligne. J'utilise le code suivant : Sub select623() Dim DerLig As Long Dim ligne As Long Const Code = 291 Application.ScreenUpdating = False If Worksheets(6).Range("A2") <> "" Then With Worksheets(6) DerLig = .Ran...
13/06/2016 à 20:55Excel - VBAImporter un fichier text du jourJe souhaite importer un fichier text dans mon classeur si il est daté du jour de l'exécution (NOW) La macro que j'ai me permet d'importer le dernier fichier modifié d'un répertoire et je souhaiterai donc le modifier mais je n'y parviens pas. J'ai essayé de remplacer Do While Len(MyFile) > 0 LMD =...
13/06/2016 à 12:22Excel - VBA Enregistrer word depuis Excel avec date du jourLe code suivant me permet bien d'enregistrer mon document word dans mon répertoire, cependant je souhaite que le nom du fichier word soit la date du jour et je n'y parviens pas. Comment dois-je gérer AppWord.ActiveDocument.SaveAs ? Sub EnvoyerTableauxExcelVersWord() Dim DocWord As Word.Document Dim...
06/06/2016 à 14:42Excel - VBACountif sur valeur cellule variableJe souhaite calculer le total de temps supérieurs à une valeur variable (contrôlée par un contrôle de toupis) Je ne parviens pas à obtenir cette valeur. J'ai essayé en notant Worksheets("feuil3").Range("G19") = Application.CountIf(Worksheets("Feuil2").Range("J:J"), ">=" & Worksheets("feuil3").Ran...
03/06/2016 à 16:31Excel - VBA Import personnalisé base de donnéeLors de l'import d'une base de donnée avec une macro j'ai besoin que la configuration réalisée à l'aide de l'assistant d'importation se réalise automatiquement. Le problème est que j'ai besoin que ma base de données soit en format standard, sauf une colonne que je souhaite mettre en format Text (dan...
31/05/2016 à 15:06Excel - VBABOUCLEJe souhaite récupérer la valeur totale des temps d'arrêt d'une machine causée par le défaut "11" dans la feuille 3, cellule N31 Mes temps d'arrêt sont dans la feuille 2 colonne J cells(i,10) et je parcours la colonne C (3) de la feuille 4 où je peux identifier le code défaut "11". Je pense ne pas êt...
26/05/2016 à 22:13Excel - VBA Sélectionner des données en fonction d'une plage horaireJe découvre VBA dans le cadre d'une stage où l'on me demande de pouvoir extraire des infos d'une base de données générée quotidiennement en format text. Je dois créer une macro permettant d'extraire un certain nombre d'informations de ces bases de données. Je suis parvenu à le faire pour le fichier...