28. august 2008 - 14:55
Der er
9 kommentarer og 1 løsning
Masser af data i array
Hej, Sidder og bøvler lidt rundt med en problem. Skal lave en test om nogle forkortelser er korrekte. Testen er let nok: For k = 0 To UBound(Land) If "DK" = Land(k, 1) Then MsgBox Land(k, 2) End If Next Problemet er bare at jeg har 33 land. Kan jeg fylde arrayet Land() lettere end at skrive noget ala følgende for hver? Land(1, 1) = "AT" Land(1, 2) = 20
Annonceindlæg fra Computerworld it-jobbank
28. august 2008 - 15:43
#1
dim land land = Sheets("Ark1").Range("A1:B33")
28. august 2008 - 15:46
#2
Ja, og så er det jeg ikke har formuleret mig rigig. Kan man undgå og have det liggende i et sheet?
28. august 2008 - 16:02
#3
ja det kan man vel men hvor har du så dine data?
28. august 2008 - 21:01
#4
Jo mine data har jeg der. Men min kontrol data vil jeg helst ikke gemme der.
28. august 2008 - 21:29
#5
Prøv lige at forklare hvad du har og hvad du forventer af en løsning Umiddelbart ser det ud som om du har en kolonne med lande og en med forkortelser for disse.
28. august 2008 - 21:37
#6
Jeg vil teste om min landekode er en af de registrede land, og hvis den er skal den skrive et tal. Altså Således helt korrekt. Data = Sheets("Ark1").Range(A1).CurrentRegion For i = 0 To UBound(Data) If Data(1,1) = Land(i, 1) Then MsgBox Land(i, 2) End If Next Hvor Land så er en function. Det bliver bare en super lang function. Men det virker fint nu.
29. august 2008 - 15:29
#7
Det er muligt jeg er en smule tungnem, men jeg får ikke meget ud af det du returnerer Jeg skal bruge fakta om ark celler kolonner rækker
01. september 2008 - 11:00
#8
Vi lukker bare denne. Her gjort som du skrev i kommentar #1. Så smid endelig et svar. :)
01. september 2008 - 13:18
#9
Det er ok, jeg afstår. Tag point selv, eller lad den stå åben lidt endnu, måske en anden kan gennemskue spørgsmålet
02. september 2008 - 09:03
#10
Tak for din tid alligevel.
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.