05. april 2010 - 22:35
Der er
13 kommentarer og 1 løsning
Hyperlinks spørgsmål????
Hej alle Jeg vil meget gerne vide om man på nogen måde kan oprette en kommando el. lign., så hvis jeg eks. skriver navnet på et givet Excel dokument, som ligger et sted på min harddisk, i celle A1. At så hvis jeg har en kommando i eks. celle B1 alla =[A1]Ark1!$C$1, at så kommer den værdi frem som er i ark1 celle C1 i det ønskede dokument som har titlen der er skrevet i A1?
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
05. april 2010 - 23:25
#1
Automatisk: Der kan skrives en makro, der kan gøre det ønskede. Manuelt: Formel hertil kunne se sådan ud - så der skal lidt "redigering" til: ='C:\Documents and Settings\pb.KHNBPB\Skrivebord\PrisArk\[prisdata.xls]Ark1'!C1
06. april 2010 - 00:13
#2
I vba: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim i As String i = Range("a1").Value Range("c1").Formula = "=[" & i & "]Ark1!C1" End Sub
06. april 2010 - 00:17
#3
Lidt bedre hvis der ikke er noget i kolonne A: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim i As String On Error GoTo slut i = Range("a1").Value Range("c1").Formula = "=[" & i & "]Ark1!C1" slut: Exit Sub End Sub
06. april 2010 - 09:17
#4
Super, det virker perfekt. Men kan man så gøre noget smart, hvis jeg ønsker at have en lang række under hinanden i A1:A100, også ud fra hver af dem skal der så komme værdien i deres tilhørende c-celle?
06. april 2010 - 11:30
#5
Sådan her men så skal du nok lave en genvejstast til denne makro. I et modul i vba - insert - module. Sub test() Dim i As String Dim ii As Integer On Error GoTo slut For ii = 1 To 100 Step 1 i = Range("a" & ii).Value Range("c" & ii).Formula = "='c:/[" & i & "]Ark1'!C" & ii Next ii slut: Exit Sub End Sub
06. april 2010 - 11:59
#6
Hej igen Den kan jeg derimod slet ikke få til at virke! Hvad mener du helt præcist med genvejstast?
06. april 2010 - 13:01
#7
Husk nu også at godkende svaret, som er lagt. Da du har fået løsningen. Men du skal bare køre makroen "test" og evt. oprette en genvej til den. Men ellers tast "alt + F11" og stil dig inde i teksten mellem sub og Tast " F5 " så kører den koden. end sub
06. april 2010 - 13:04
#8
Her er et eksempel fra min egen kode: A1 C1 1.xls 8687765786 A2 C2 osv. 2.xls 0 3.xls 0 4.xls 8687765789 5.xls 86877790
06. april 2010 - 13:32
#9
Må indrømme at det der forstår jeg ingenting af... Har du måske mulighed for at sende mig et dokument hvori det bare køre, så jeg har et eksempel at gå ud fra? Tror ik det er noget problem for mig, hvis jeg har noget helt konkret at gå ud fra.. min mail er nbenzon@sol.dk på forhånd mange tak for hjælpen
06. april 2010 - 13:43
#10
jo, når du har godkendt mit svar, på dit stillede spørgsmål som er besvaret.
06. april 2010 - 13:48
#11
Sorry.... sådan!
06. april 2010 - 14:07
#12
Er sendt
06. april 2010 - 14:37
#13
har desværre ikke modtaget noget endnu! Du må også gerne prøve nbb@jobguiderne.dk
06. april 2010 - 15:12
#14
Så har jeg forsøgt på nbb@jobguiderne.dk
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig