Avatar billede lkt Juniormester
27. august 2024 - 15:09 Der er 5 kommentarer

Kode til det enkelte ark.

Kære eksperter

Jeg skal lave et regneark til brug ved tidsregistrering. Jeg vil gerne lave én fil, hvor medarbejderne kan logge ind og skrive deres arbejdstider.

Kan man sætte en kode på det enkelte ark i filen, så det kun kan ses af den enkelte medarbejder og ledelsen?

Jeg tænker, det kan lægges på Onedrive som en fil, som alle kan tilgå og så med koden, så man kun kan se sit eget ark (Sine egne data).

Kan det mon lade sig gøre?
Avatar billede madklub Guru
27. august 2024 - 15:45 #1
Nej, det kan man ikke (på en nem og praktisk måde)
Excel kan låse arkfaner for redigering, men ikke visning.

Men hvorfor skal det være skjult?
Lav en løsning hvor alle kan se hvor meget de andre arbejder.
Der vil opstå en usund konkurrence mellem medarbejderne.
Hvem kan logge flest timer???

Din chef vil elske dig
(ironi kan forekomme)
Avatar billede lkt Juniormester
27. august 2024 - 16:04 #2
Ja, det kunne måske give mig nogle point. 😉 Og dem har jeg altid brug for.

Jeg er i tvivl, om det MÅ kunne ses af alle pga. af GDPR. Vi skal jo helst ikke i klemme der.

Tak for svaret.
Avatar billede kim1a Ekspert
27. august 2024 - 16:11 #3
Løsningen kan være at de ikke kan se deres eget heller.
Du kan med en makro lave en dialogboks til input som så gemmes et sted de ikke kan se.
Du kan skjule en fane og sætte kode for redigering (en kode som makroen kender), derudover skal du sætte kode på visual basic editoren.

Det er ikke et optimalt stykke værktøj til det.
Avatar billede madklub Guru
28. august 2024 - 10:09 #4
Man kunne også bruge koder i stedet for navne.

Fx Hans hedder 123654
Grethe hedder 951489

Medarbejderen kender sin kode og chefen gør også.
Avatar billede jens48 Ekspert
28. august 2024 - 11:48 #5
Jeg har modificeret en makro, som jeg bruger til at finde ud af en bruger er berettiget til at bruge en fil. Prøv at bruge den. Den bruger brugernavnet til at lukke alle ark der ikke har samme navn som brugeren.

Private Sub workbook_open()
Dim Users As Variant
Dim UName As String
Dim Ws As Worksheet
UName = Environ("UserName")
'On Error Resume Next
  ActiveWorkbook.Unprotect Password:=123456
For Each Ws In ActiveWorkbook.Worksheets
If Ws.Name = UName Then
Ws.Visible = True
Else
Ws.Visible = False
End If
  Next
ActiveWorkbook.Protect Structure:=True, Windows:=False, Password:=123456
End Sub
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester