Vraag & Antwoord

Anders (software)

excel handeling herhalen?

10 antwoorden
  • Ik ben bezig met wat dataverzameling en moet hiervoor 179x ongeveer hetzelfde doen; importeren van dagelijkse koersen uit een.csv Hierbij kies ik 1) gescheiden via komma 2) ik laat de 2,3 en 5e kolom weg, en voor kolom 4 en 6 kies bij geavanceerd dat het scheidingsteken . is (ipv ,) 3) alles sorteren op de eerste kolom (date) van oud naar nieuw Is er een manier om dit wat sneller te doen? stap 4 is overigens om vanaf D3 de formule =LN(B3/B2) in te voeren.
  • via een macro? Opnemen en uitvoeren... zie Help, F1.
  • [quote:ab6702cbd8="andre@home"]via een macro? Opnemen en uitvoeren... zie Help, F1.[/quote:ab6702cbd8] Er is wel steeds een andere filename dus precies nadoen gaat niet werken. Ik weet van te voren wel hoe de files heten (want ik download ze zelf), kan ik daar dan nog iets mee? Ik heb al een lijst van codes, mijn gedownloade financiele data noem ik naar deze code (bijvoorbeeld F.csv voor bedrijf met beurs symbool F).
  • Ik heb ooit zoiets in elkaar geknutseld waarbij je middels een popupbox het weeknummer invoerde en dat vervolgens het bestand van die week werd geimporteerd. Helaas is het alweer enkele jaren geleden en mijn kennis van vba/macro's is nu ook weer niet zo groot. Hieronder de code die ik in de excelsheet had staan, hopelijk heb je er wat aan. [code:1:2ceb0abcd5] Dim beginBnaam As String, weeknoBnaam As String, eindBnaam As String beginBnaam = "weekomzet" weeknoBnaam = InputBox("Voer weeknummer in:", "Overzicht", "01") eindBnaam = ".txt" Workbooks.OpenText Filename:= _ "M:\Mijn Documenten\My Documents\Prive\Macro's\" & beginBnaam & weeknoBnaam & eindBnaam, _ Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _ xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, _ Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), _ Array(2, 1), Array(3, 1)), TrailingMinusNumbers:=True[/code:1:2ceb0abcd5]
  • grote edit Ziet er inderdaad goed uit. Eureka eerste versie werkt (zie onder) v2 worksheet hernoemen gelukt v3 nu moet sorteren:) v4 heeft ook de forumule tm de last cell (via een functie) v5 ok ook excel irritante date limiet overkomen:)
  • hier staan codes tussen: http://www.google.nl/#hl=nl&source=hp&q=DATUM+ZOEKEN+EXCEL+MACRO&meta=&aq=f&aqi=&aql=&oq=&gs_rfai=&fp=bb0769f9673df0c5
  • [quote:f5207eb212="andre@home"]hier staan codes tussen: http://www.google.nl/#hl=nl&source=hp&q=DATUM+ZOEKEN+EXCEL+MACRO&meta=&aq=f&aqi=&aql=&oq=&gs_rfai=&fp=bb0769f9673df0c5[/quote:f5207eb212] het is gelukt met de functie format ( variable, "short date")
  • 8)
  • Nooit gedacht dat je zoveel met excel kon :? . Ik heb het nu bijna volledig geautomatiseerd 8) 8) 8) . makro1: importeermakro Haalt op basis van een event ID uit de beginlijst de company code, en importeerd vervolgens de data uit het bijbehorende CSV bestand. Sorteerd de kolommen en berekent de ln(x / x-1). (Scheelt me 100x 20+clicks) Makro2: berekenmakro Haalt op basis van event ID en event date en company ID op, zoekt deze event date vervolgens zelf op in het tabblad van het bijbehorende bedrijf en selecteerd de range van 240 dagen hiervoor tot 10 dagen. Hierna en plakt deze de datarange in een nieuwe worksheet die wordt aangemaakt op basis van een example worksheet (waar dus alle ingewikkelde formules in staan en de layout). Hij doet hetzelfde voor de index waardes (ook 250 van nodig). Enige nadeel is dat ik nu per event een nieuw tabblad krijg en ik die uiteindelijk waardes moet combineren. Het moet vast mogelijk zijn om een soort loop te maken die voor elk event de waarde uit het bijbehorende tabblad ophaalt (naam = eventid+companyid) en vervolgens rij i6 tm i 16 kopierd naar een steeds naar rechts opschuivende tabel in een nieuw tab blad. Morgen maar even uitzoeken hoe je steeds 1tje naar rechts opschuift :P .
  • iets? http://www.eggheadcafe.com/community/aspnet/66/10069109/move-row-one-row-down-by.aspx via http://www.google.nl/#hl=nl&q=macro+excel+%22one+row%22+to+right+code&meta=&aq=f&aqi=&aql=&oq=&gs_rfai=&fp=52ffd7f621c10eb8

Beantwoord deze vraag

Weet jij het antwoord op deze vraag? Registreer of meld je aan met je account

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.