Allen,
In file in bijlage (in de "echte") staat onderstaande code in voor het printen.
Deze print dus steeds de legen cellen in het wit, is veel beter leesbaar dan "gewoon" af te printen.
Nu heb ik deze denkwijze ook eens toegepast op het beeldscherm zelf als de file geopend is, lukt dus ook...
Nu mijn vraag;
Ik kan via Environ("username") herkennen wie de file opent.
Is het nu mogelijk om bij geopend scherm (bij bepaalde persoon) lege cellen wit te laten kleuren, de personen vullen deze file dan in/aan, dan bij het saven van de file de (tekst)wijzigingen bij te houden in de originele lay out (grijs/groen)?
Waarom? Ikzelf gebruik graag de originele file (in bijlage), de andere zouden liever de cellen in het wit zien bij openen file, persoonlijke keuzes...
Het is veel gevraagd, maar alvast bedankt voor de moeite!
Mvg
In file in bijlage (in de "echte") staat onderstaande code in voor het printen.
Code:
ActiveWorkbook.Unprotect ""
With Application
.EnableEvents = False
.DisplayAlerts = False
End With
naam = ActiveSheet.Name
ActiveSheet.Copy After:=Sheets(Sheets.Count)
With Range("A13:AB74")
.SpecialCells(4).Interior.Color = xlNone
.PrintOut , Copies:=1
End With
ActiveSheet.Delete
Sheets(naam).Select
With Application
.EnableEvents = True
.DisplayAlerts = True
End With
End If
Deze print dus steeds de legen cellen in het wit, is veel beter leesbaar dan "gewoon" af te printen.
Nu heb ik deze denkwijze ook eens toegepast op het beeldscherm zelf als de file geopend is, lukt dus ook...
Nu mijn vraag;
Ik kan via Environ("username") herkennen wie de file opent.
Is het nu mogelijk om bij geopend scherm (bij bepaalde persoon) lege cellen wit te laten kleuren, de personen vullen deze file dan in/aan, dan bij het saven van de file de (tekst)wijzigingen bij te houden in de originele lay out (grijs/groen)?
Waarom? Ikzelf gebruik graag de originele file (in bijlage), de andere zouden liever de cellen in het wit zien bij openen file, persoonlijke keuzes...
Het is veel gevraagd, maar alvast bedankt voor de moeite!
Mvg