• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Automatisch overnemen celopmaak

Status
Niet open voor verdere reacties.
A

adhoeks

Gebruiker
Lid geworden
9 apr 2018
Berichten
13
Hallo,
nieuw op het forum en heb het volgende probleem:
Om inzage te verkrijgen in een deel van het grote spreadsheet heb ik een inzage werkblad gemaakt met links naar het hoofdwerkblad en die wordt middels een macro met timer automatisch bijgewerkt,
maar mijn probleem is, dat enkel de inhoud aangepast wordt, maar niet de opmaak en die is toch essentieel omdat er soms attentievelden zijn waar extra op gelet moet worden.
Ik heb het geprobeerd met een dynamische afbeelding en dat werkt op zich fantastisch, maar omdat het een rooster betreft waarvan het masterbestand wekelijks veranderd (week 13,xlsx, week 14.xlsx etc.) is het erg bewerkelijk om elke week weer een nieuwe dynamische afbeelding te moeten maken.
Is er misschien een VBA code die ik aan onderstaande macro kan toevoegen, zodat ook de opmaak meegenomen wordt?
Alvast hartelijk dank.
Ad Hoeks

Code: 
Sub opslag()
ThisWorkbook.UpdateLink ThisWorkbook.LinkSources
StartTimer  ' Reschedule the procedure
End Sub
 
Je kunt de verwijzing van die dynamische afbeelding (Camera-Tool?) toch steeds aanpassen?
 
E v R zei:
Je kunt de verwijzing van die dynamische afbeelding (Camera-Tool?) toch steeds aanpassen?
Klik om te vergroten...

Hoi Eric,
als dat kan, dan ben ik er ook, maar dat lukt mij op een of andere manier niet; ik kan die hyperlink niet bewerken of ik doe iets niet goed.
mvgr.
Ad Hoeks
 
Heb je gelijkende voorbeeldbestandje(s)?
 
Voorbeeld.
Spreadsheet 1 bevat meerdere werkbladen van een rooster/shift per dag en een weekoverzicht met daarin op willekeurige plekken een attentie kleur.
Vanuit het weekoverzicht wordt een ander spreadsheet gevuld als dagoverzicht middels een dynamische afbeelding van een gedeelte van het weekoverzicht. Dat ziet er fantastisch uit, maar het nadeel is dat ik telkens een nieuwe dynamische afbeelding moet knippen en plakken.
Als ik nu zou weten hoe ik de link naar een dynamische afbeelding kan bewerken, dan ben ik geholpen.
Hartelijk dank alvast.
Mvgr
Ad Hoeks
 
EvR bedoelde niet een voorbeeld beschrijven maar een excel bestand. Maar afijn. Ik vind de vraag ook intressant dus ik heb zelf een voorbeeld gemaakt,

Je kunt een gekoppelde afbeelding flexibel maken. Ik heb de aanname gedaan dat jij steeds alleen xx kolommen naar rechts opschuift.

In de bijlage zie je een bestand met alle maanden en alle dagen.
in het gekoppelde afbeelding laat ik 3 maanden zien, de eerste 14 dagen van die maanden. (Gewoon als voorbeeld)

Als je de gekoppende afbeelding aanklikt zie je in de formule balk een verwijzing staan naar een bereik bijv =$A$1:$C$15
In plaats van dat bereik mag je ook een gedefinieerde naam gebruiken.
Ik heb een naam Camera bereik aangemaakt en daar een formule VERSCHUIVING aangemaakt.

Code: 
=VERSCHUIVING($A$1;0;$S$2;15;3)

Eerste waarde $A$1 is het startpunt.
0 geeft aantal rijen dat naar beneden wordt geschoven
$S$2 is een cel waar je kunt invoeren hoeveel kolommen naar rechts geschoven moet worden
15 is de hoogte van het bereik
3 is het aantal kolommen van het bereik.

in de formule balk vervang je het vaste bereik =$A$1:$C$15 door =CameraBereik (dit heb ik al gedaan)

met 0 of leeg in cel S2 zie je jan tm mrt
vul je 1 in dan zie je feb tm apr
enz

Dit is de basis.. en daarmee kun je dus schuiven door je sheet.
als je bijv. steeds een kwartaal wil opschuiven dan voer je 3,6of 9 in.
je zou dat nog kunnen verfijnen naar hoe jij het wil toepassen in jou sheet.
 

Bijlagen

  • CameriaBereik verschuiven.xlsx
    16,3 KB · Weergaven: 65
Voorbeeld van spreadsheet

Bekijk bijlage DISPLAY DAGPLANNING.xlsxBekijk bijlage PLANNING WEEK 1.xlsxBekijk bijlage PLANNING WEEK 2.xlsx

Bijgaand een paar voorbeeldbestandjes.
Het gaat dus om een weekrooster, week 1, week 2 etc.
Van dat weekrooster wordt een dag gepresenteerd via display dagplanning, waar ik middels een dynamische afbeeldingslink een dag van de week kan presenteren.
Echter, als ik daarna deze zelfde link wil laten kijken in het volgende weekrooster, dan krijg ik niet voor elkaar om die dynamische afbeeldingslink ipv naar week 1 naar week 2 te laten kijken.
Wie kan me helpen?
Alvast hartelijk dank voor het meedenken.
Top!!!
mvgr.
Ad Hoeks
 
Code: 
Sub test()
wknr = 2
    Sheets("Blad1").Pictures("Afbeelding 4").Formula = "'[PLANNING WEEK " & wknr & ".xlsx]Blad1'!$A$1:$C$17"
End Sub

Als je dit macrootje draait moet wel het bestandje van Planning + wknr openstaan
 
macro eric

Hoi Eric,
ik heb jouw macro getest en het werkt!
Ik ga dit verder uitwerken met het planningsbestand.
Dank je wel
mvgr.
Ad Hoeks
 
adhoeks zei:
Hoi Eric,
ik heb jouw macro getest en het werkt!
Ik ga dit verder uitwerken met het planningsbestand.
Dank je wel
mvgr.
Ad Hoeks
Klik om te vergroten...
Maar....nu heb ik nog een vraagje: is er ook een syntax die de koppeling bijwerkt als het hoofdbestand niet geopend is?
Dat zou nog veel mooier zijn.
:)
mvgr.
ad Hoeks
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan