Notifikationer

Markér alle som læst Log ud

jdjensen Juniormester

26. juli 2011 - 11:05 Der er 2 kommentarer og
1 løsning

Kommentarfelter styret af en dropdown i Excel

Hej,

Jeg vil gerne i min excelfil have kommentarfelter/textfields under flere forskellige ark i min excelfil som skal bruges til at forklare mine grafer med. Kommentarfelterne skal alle være styret af en dropdown der viser "Week1 - Week53".

Eksempel:
1: Jeg vælger "Week 1" i min dropdown som er placeret på arket "CoverSheet".
2: Jeg går nu ind på det første Sheet og udfylder 3 forskellige textfields med Teksten "Dette er uge 1" (Teksterne jeg indtaster i mine textfields er dog typisk alle forskellige). Teksten er automatisk gemt under "Week 1".
3: Jeg vælger "Week 2" i min dropdown som er placeret på arket "CoverSheet".
4: Jeg går igen ind på det første ark og udfylder 3 forskellige textfields med Teksten "Dette er uge 2" (Teksterne jeg indtaster i mine textfields er dog typisk alle forskellige). Teksten er automatisk gemt under "Week 2".

Altså: mine textfields er styret af dropdown'en. Alt efter hvilken uge (Week1-Week53) dropdown'en er sat til, vises noget forskelligt tekstindhold i de textfields jeg har placeret forskellige steder (Sheets) i min excelfil.

Felter:
[Dropdown] (Values: Week1 - Week53) og ligger på arket kaldet "CoverSheet")

[Celle/textfields]:
Placeret på flere forskellige ark (Sheet1, Sheet2, osv) i min excelfil hvor indholdet styres af hvad dropdown'en er sat til.

Min kommentarer bliver altså arkiveret under en en værdi i dropdown'en hvilket er formålet. Hvis der skal foretages nogle beregninger har jeg et dedikeret ark kaldet "Lookup" hvor disse kan komme ind under. Jeg ønsker ikke nogen beregninger vise på de sheets hvor grafer, kommentar felter eller dropdown'en vises. Disse sheets skal holdes "rene".

Er det muligt?

Jeg sender gerne min excelfil pr. email som jeg gerne vil integrere ovenstående i da det måske er det nemmest for dig. Jeg bruger desuden Excel 2003 på engelsk.

Håber en excel-ekspert derude kan hjælpe.

Synes godt om

supertekst Ekspert

26. juli 2011 - 12:41 #1

Du skal være velkommen til at sende filen. @-adresse under min profil. Anvender DK-2007 - men jeg skal forsøge..

Synes godt om

jdjensen Juniormester

27. juli 2011 - 15:07 #2

Supertekst: Tak, jeg sender dig lige en mail. :-)

Synes godt om

supertekst Ekspert

31. juli 2011 - 18:04 #3

Primær kode:
Public flag As Boolean
Public arkSum As Worksheet
Dim arkW As Worksheet
Public Sub visKommentarer(ugeNr As String)
Application.ScreenUpdating = False
flag = True
If findesUgen(ugeNr) = True Then
Set arkW = ActiveWorkbook.Sheets(ugeNr)
arkW.Activate

If InStr(arkSum.Name, "Overview") = 1 Then
arkW.Range("A:E").Select
Else
arkW.Range("J:N").Select
End If

Selection.Copy

arkSum.Activate
arkSum.Range("J:N").Select
arkSum.Paste
Range("J1").Select

Application.CutCopyMode = False
End If

flag = False
Application.ScreenUpdating = True
End Sub
Private Function findesUgen(ugeNr)
Dim ark As Worksheet
Application.ScreenUpdating = False

For Each ark In ActiveWorkbook.Sheets
If ark.Name = ugeNr Then
findesUgen = True
Exit Function
End If
Next ark
findesUgen = False
End Function
Public Sub gemKommentar()
Application.ScreenUpdating = False

flag = True
Set arkSum = ActiveSheet

arkSum.Range("J:N").Select
Selection.Copy

arkW.Activate

If InStr(arkSum.Name, "Overview") = 1 Then
arkW.Range("A:E").Select
Else
arkW.Range("J:N").Select
End If

ActiveSheet.Paste

Application.CutCopyMode = False
arkSum.Activate
Range("J1").Select

flag = False
Application.ScreenUpdating = True
End Sub
Private Sub UserForm_activate()
Dim w As Byte
flag = False
Set arkSum = ActiveWorkbook.Sheets(1)
End Sub

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Samle data fra flere kolonner i 1 Af FinnLauridsen i Excel	4	17/04/202616:11	18/04/202608:16
Træk data fra ny lokation ved måneds skift Af Hezo i Excel	6	13/04/202614:32	15/04/202611:04
Makro der gemmer vedhæftet fil fra Msg og omdøber filen Af lokesa i Excel	2	31/03/202610:22	31/03/202611:47
Stempel ur start og stop Af lurup i Excel	2	23/03/202613:24	31/03/202610:27
Hvordan bruges indeks & sammenlign når der skal søges over flere kolonner? Af Laugesen1 i Excel	4	08/03/202611:56	08/03/202613:57

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS