*

Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: kopieren van werkbladen  (gelezen 4436 keer)

0 leden en 1 gast bekijken dit topic.

Offline gogomama

  • Nieuw lid
  • Berichten: 4
  • Oplossing.be
kopieren van werkbladen
« Gepost op: 25 april 2007, 15:07:06 »
Beste,
Ik ben al een tijdje op zoek naar volgende probleem:
Ik heb een werkmap met verschillende tabbladen
OVERZICHT
BLANCO
NUMMERS

stap 1: Een kopie maken van het blanco overzicht en zelf een naam geven ( dus nieuwe sheet) vb:1000
Deze sheet wordt ingevuld .
stap2: de gegevens van dit blad , dus blad 1000 kopieren naar overzicht ( Overzicht bestaat uit rijen onder mekaar)

Mijn probleem is nu als ik de actie opnieuw uitvoer kan ik niet doorvoeren... is er een mogelijkheid om dit te automatiseren?

Ik ben nieuw , hoe laad ik een exelfile op ?

Groetjes mama,,,,
Gelogd
Standaard emailprogramma: Office Outlook
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: kopieren van werkbladen
« Reactie #1 Gepost op: 25 april 2007, 22:40:33 »
Hallo, gogomama,
(hmm, dat tijpt lekker: goeie nickname !)
welkom op het forum !

Citaat
Mijn probleem is nu als ik de actie opnieuw uitvoer kan ik niet doorvoeren
'k Heb wel een sterk vermoeden wat je hiermee bedoelt. Leg alsjeblieft even uit aan de hand van een voorbeeld.

Het lijkt er ook sterk op dat je een macro hebt opgenomen. Laat die ook zien, zodat we er samen aan kunnen werken.

beste groeten,
Erik

PS:
je hoeft niet persé een bestand in bijlage te zetten, ik denk niet dat het nodig is in dit geval, maar jij beslist natuurlijk
klik op "extra opties" wanneer je een bericht aanmaakt
Gelogd

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.280
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: kopieren van werkbladen
« Reactie #2 Gepost op: 25 april 2007, 22:55:03 »
Mama, welkom op dit forum. Effe je vragen uitsplitsen...
Citaat
Ik ben al een tijdje op zoek naar volgende probleem
Ik hoop toch dat je al een tijdje opzoek bent naar de OPLOSSING voor je probleem... ;D ;D (flauw grapje, sorry ;))

Citaat
stap 1: Een kopie maken van het blanco overzicht en zelf een naam geven ( dus nieuwe sheet) vb:1000
Moet deze copy in hetzelfde workbook komen? Staan er formules e.d. in die 'blanco sheet'?

Citaat
stap2: de gegevens van dit blad , dus blad 1000 kopieren naar overzicht
Die nieuwe gegevens, moeten die gecopieerd of verplaatst worden? Wat gebeurt er daarna met 'sheet 1000'?

Citaat
Mijn probleem is nu als ik de actie opnieuw uitvoer kan ik niet doorvoeren...
Wat voor actie voer je opnieuw uit en wat kan je dan niet doorvoeren? Zijn dat de formules uit de 'sheet 1000'?

Citaat
hoe laad ik een exelfile op ?
Da's niet zo moeilijk (en voor ons waarschijnlijk veel verduidelijkend). Links onder het deel waar je je bericht tikt, zie je in het blauw de woorden > Extra opties.... Door dat 'open' te klikken, verschijnen er meer mogelijkheden om iets met je bericht te doen. Verder zie je ook een 'vak' met daarvoor het woord Bijlage: en er achter een knop 'Bladeren...'. Klik op die knop en er opent een zoekvenster (met de bestanden en mappen van je eigen PC) waar je je gewenste bericht kan selecteren. Door na het selecteren op de knop 'Openen' te klikken, zal het bestandspad in de regel Bijlage: verschijnen. Daarna is het gewoon een kwestie van de knop 'Verzenden' aan te klikken, en je bestand staat online... ;)

Succes, we zijn benieuwd.

Groet, Leo

EDIT: 2x welkom is toch mooi nietwaar? ('k had Erik z'n reactie niet gezien... We waren duidelijk weer gelijktijdig bezig... ;D)
Gelogd
______________________________

Groet, Leo

Offline gogomama

  • Nieuw lid
  • Berichten: 4
  • Oplossing.be
Re: kopieren van werkbladen
« Reactie #3 Gepost op: 26 april 2007, 09:45:07 »
Beste,
Alvast bedankt voor jullie antwoorden

Ik heb wel al geprobeerd met een macro maar dat werkt niet echt goed . Het probleem is dat hij telkens de gegevens uit een nieuwe sheet moet kopieren naar "Overzicht " . De verwijzing '1000!' moet telkens veranderen naar de naam van de nieuwe sheet die gemaakt wordt door een kopie te nemen van de BLANCO sheet ..
Ik heb in bijlage een voorbeeldje gezet , misschien helpt dit jullie beter mijn probleem...
Heel erg bedankt alvast... ;D
Gelogd
Standaard emailprogramma: Office Outlook
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.280
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: kopieren van werkbladen
« Reactie #4 Gepost op: 26 april 2007, 10:45:01 »
Mama, je kan je 'sheet-verwijzijng' oplossen met de functie INDIRECT (nederlandse benaming weet ik hier ff niet). In cel A5 van sheet 'overzicht' kan je dan de formule =INDIRECT("'"&C5&"'!$B$3") plaatsen. De voorwaarde voor het juist werken van deze formule is dat je in cel C5 géén verwijzing plaatst maar het werkelijke klachtnummer.

Wat ik wel als goedbedoelde opmerking wil zeggen is het volgende. Ik hoop dat jullie niet veel klachten in het bedrijf hebben. Als je namelijk voor iedere klacht een worksheet gaat aanmaken, heb je binnen de kortste tijd een workbook van vele 10-talle MB's... En dat is niet leuk werken.
Je zou 'ns moeten nadenken over 1 sheet met een formulier die vervolgens na het invullen de gegevens wegschrijft naar het totalenblad (nadeel is dan dat je er naderhand niets meer in kan bijwerken) ipv allemaal formules met celverwijzingen.
Naar mijn idee ben je bezig met het maken van een database-applicatie, maar dan in Excel. In Access zou zoiets een stuk beter uit komen denk ik zo....

Groet, Leo
Gelogd
______________________________

Groet, Leo

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: kopieren van werkbladen
« Reactie #5 Gepost op: 26 april 2007, 13:43:02 »
Zoals Leo al schreef. Hopelijk niet te veel klachten :-)

Nee, echt, gogomama, dit is niet werkbaar. Met zoveel indirect-formules, zal je werkboek loodzwaar en slaktraag worden.

Je hebt hier een "wegschrijf- en ophaalsysteem" voor nodig.
Even laten proeven:
Klikje op knop
Formuliertje komt te voorschijn.
Zoekfunctie, om vlug iets terug te vinden.
Item selecteren (klachtnummer of klant of om het even)
Alles wordt automatisch op je klachtenblad ingevuld.
Klachtenblad raadplegen.
Eventueel wijzigingen aanbrengen.
Al dan niet deze wijzigingen naar de database wegschrijven.
...
Op klachtenblad staat uiteraard een "volgende" en "vorige" knop en ook een "zoek"knop.
...

beste groeten,
Erik
Gelogd

Offline gogomama

  • Nieuw lid
  • Berichten: 4
  • Oplossing.be
Re: kopieren van werkbladen
« Reactie #6 Gepost op: 26 april 2007, 13:57:06 »
hey allemaal ,
en dit op zo een zonnige namiddag...soit ...
Ik had ergens ook al een sterk vermoeden dat dit niet te doen is .
Ik weet ook dat het programma beter zou draaien en werken in Access , maar alles zit zo een beetje in een beginfase, en er moeten meerdere mensen met die exelfile werken ...
Toch geef ik het niet op ...ik zoek verder voor een betere oplossing.
Ik zou ook voorstander zijn van te werken met 1 formulier , sjabloon , gegevens invullen , kopieren naar blad overzicht , gegevens saven, gegevens wissen ...
Ga nog ff expirimenteren...
Ik stuur terug later....groetjes....
Thanks 8) 8) de mama
Gelogd
Standaard emailprogramma: Office Outlook
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: kopieren van werkbladen
« Reactie #7 Gepost op: 26 april 2007, 14:30:35 »
Hallo,

Excel lijkt me beter dan Access voor dit doel. Flexibiliteit is Excels troef...

Hier een voorlopige oplossing. In plaats van al die INDIRECT formulas, kan je zolang beter war code gebruiken.
Code: [Selecteer]
Option Explicit

Sub formules_doorvoeren()
'Erik Van Geit
'telkens uit te voeren wanneer je een nieuw blad aanmaakt
'nieuw blad moet laatste blad zijn

Dim LR As Long          'Last Row
Dim NS As String        'New Sheet
Dim PS As String        'Previous Sheet
Dim c As Range
Dim area As Range

NS = Worksheets(Sheets.Count).Name
PS = Worksheets(Sheets.Count - 1).Name

    With Sheets("OVERZICHT")
    LR = .Cells(Rows.Count, 1).End(xlUp).Row
   
        With .Range("A" & LR & ":O" & LR).SpecialCells(xlCellTypeFormulas)
           
            Set c = Nothing
            Set c = .Find(PS, LookIn:=xlFormulas, lookat:=xlPart, MatchCase:=False)
            If c Is Nothing Then
            MsgBox "Formules voor blad " & PS & " werden niet doorgevoerd", vbCritical, "FOUT"
            Exit Sub
            End If

            Set c = Nothing
            Set c = .Find(NS, LookIn:=xlFormulas, lookat:=xlPart, MatchCase:=False)
            If Not c Is Nothing Then
            MsgBox "Formules voor blad " & NS & " zijn reeds doorgevoerd", vbCritical, "FOUT"
            Exit Sub
            End If
           
            For Each area In .Areas
            area.Offset(1, 0).Formula = area.Formula
            Next area
           
        .Offset(1, 0).Replace what:=PS & "!", replacement:=NS & "!", lookat:=xlPart
        End With
   
    End With

End Sub
Dit kan volautomatisch gemaakt worden, weliswaar met nogal wat studiewerk.
Nieuw blad invoegen = nieuwe formulelijn bijmaken
Blad verwijderen = formulelijn verwijderen
Volgorde der bladen zou geen rol spelen.

De voorgestelde oplossing met beperkt aantal bladen en gebruiksvriendelijke code blijft echter veruit te verkiezen.

zonnegroet,
Erik
Gelogd

Offline gogomama

  • Nieuw lid
  • Berichten: 4
  • Oplossing.be
Re: kopieren van werkbladen
« Reactie #8 Gepost op: 26 april 2007, 15:13:57 »
Woops ...
Jij bent een tovenaar in Exel !  :P Ik heb daarnet de code met de indirecte verwijzingen in mijn worksheet geïmplanteerd , vind ik al prima werken ... het is nu toch al een hoop minder werk om mijn overzicht up to date te houden.
Van VBA code ken ik niet zo goed,enkel de basis, maar ik ga effe proberen , heb nog wat tijd over vandaag ...
Allemaal al heel heel veel bedankjes en tot later ....

mama
Gelogd
Standaard emailprogramma: Office Outlook
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6
Pagina's: [1]   Omhoog
 


www.combell.com