dave2000 Nybegynder
26. maj 2003 - 14:53 Der er 14 kommentarer og
2 løsninger

Midde værdi, konstant

Hvad er der galt med den følgende sætning?

  Sheets(t).Select
  Range("F6").Value = "=AVERAGE(t!C" & x & ":C" & y & ")"

og t = UF4.TextBox3.Value, 'UF(User¨Form)og x og y er nogle konstanter.

Med hver gang jeg bruger den så får jeg følgende sætning :

  " File t not found "

Er der nogen der kan sige hvad jeg har gjort forkert?

Mvh / David
b_hansen Nybegynder
26. maj 2003 - 14:59 #1
Du henviser til filen t i linien "=AVERAGE(t!C" & x & ":C" & y & ")"

Det gøres i "t!"
b_hansen Nybegynder
26. maj 2003 - 15:02 #2
Hvis du bare skal henvise til den fil, hvor du har din makro, skal du bare slette "t!".
Alternativt mangler du nogle anførselstegn:
"=AVERAGE("t"!C" & x & ":C" & y & ")"
dave2000 Nybegynder
26. maj 2003 - 15:09 #3
b hansen
t er bare navnet på ARK1.
Og jeg skulle bare tage gennemsnit af 5 tal der står på kollone C på ark1 eller t.
og det med "t" virker desværre ikke.
b_hansen Nybegynder
26. maj 2003 - 15:12 #4
i dit tilfælde er t blevet til navnet på en fil, da den er indefor de to første anførselstegn. Det er derfor, du får fejlmeldingen. Så du bliver nød til at lege lidt med at placere nogle flere anførselstegn i din formellinie
b_hansen Nybegynder
26. maj 2003 - 15:19 #5
Selvfølgelig... der mangler jo nogle &-tegn:

"=AVERAGE(" & t & "!C" & x & ":C" & y & ")"
dave2000 Nybegynder
26. maj 2003 - 15:42 #6
Jeg får fejl igen!
b_hansen Nybegynder
26. maj 2003 - 15:44 #7
hvilken fejl?
dave2000 Nybegynder
26. maj 2003 - 15:46 #8
At  Sheets("&t&").select  er forkert.
kabbak Forsker
26. maj 2003 - 15:52 #9
"=AVERAGE("t!C" & x & ":C" & y & ")"

der var et " formeget
bak Novice
26. maj 2003 - 17:21 #10
Her er en lille demo. Det her virker fint, men i din kode skriver du
Range("F6").Value. Betyder det at du ikke ønsker formlen indsat, men kun værdien ?
Hvis det er tilfældet, så fjern apostroffen fra sidste linie

Sub test()
t = "Sheet1"
x = 2
y = 10
Sheets(t).Select
Range("F6").Formula = "=AVERAGE(" & t & "!C" & x & ":C" & y & ")"
'Range("F6") = Range("F6").Value
End Sub
bak Novice
26. maj 2003 - 17:31 #11
en anden mulighed, hvis du ikke vil have formlen indsat men kun værdien
Sub test()
t = "Sheet1"
x = 2
y = 10
Sheets(t).Select
Range("F6").Value = Application.WorksheetFunction.Average(Sheets(t).Range("C" & x & ":C" & y))
End Sub
dave2000 Nybegynder
27. maj 2003 - 10:18 #12
Det virker bare ikke.
Hvis jeg skriver :
  Let t = UserForm1.TextBox3.Value
  Sheets(t).select
så er der ingen problemer med konstanten "t".

men og men de her går slet ikke :

Range("F6").Value = "=AVERAGE(t!B" & x & ":B" & y & ")"
eller
Range("F6").Value = "=AVERAGE("&t&"!B" & x & ":B" & y & ")"
eller
Range("F6").Value = "=AVERAGE('t'!B" & x & ":B" & y & ")"

Hvordan får jeg "t" til at virke?
b_hansen Nybegynder
27. maj 2003 - 10:22 #13
Jeg vil foreslå at bruge bak's løsning.

Når jeg tester diverse versioner af "=AVERAGE(" & t & "!C" & x & ":C" & y & ")", bliver der sat apostroffer omkring celleangivelserne. Eksempelvis 'B1':'C1'
bak Novice
27. maj 2003 - 12:42 #14
Dave2000, dine tre forslag virker ikke fordi du vil sætte range("F6").value lig med en formel. Denne formel er opgivet som en tekst. Altså vil du kun få en tekst i F6.
du SKAL bruge
range("F6").Formula="=AVERAGE(" & t & "!C" & x & ":C" & y & ")"
dave2000 Nybegynder
27. maj 2003 - 13:41 #15
bak
At last at last.
Tak for hjælpen, igen.
Det virkede, men samme fejl må ikke gentages igen, så gider du sende mig et svar i stedet for kommentar.

Mvh/Dave2000
bak Novice
27. maj 2003 - 17:28 #16
Ok, godt det funker :-)
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

Opret Preview

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





Computerworld
Apples nye iOS 11 skaber store batteriproblemer på iPhone og iPad: Disse fire ting kan du gøre ved det
Apples nye iOS 11 skaber batteriproblemer for mange brugere, der oplever, at iPhonen pludselig ikke længere holder til en hel dag på jobbet. Du kan dog selv minimere problemet med disse fire lette trin.
CIO
Bare glem alle advarsler og alarmklokker: ”Din smartphone får ikke virus”
Sikkerhedsfirmaer advarer jævnligt om, at almindelige menneskers smartphone står pivåbne for virus og malware. Men ifølge en kendt sikkerhedsekspert findes det stort set ikke i Danmark.
Comon
Oversigt: Her er de bedste Android-smartphones der kan købes i Danmark
Det vrimler med spændende Android-smartphones på markedet. Vi har samlet en oversigt over de bedste Android-telefoner, du kan købe herhjemme netop nu.
Job & Karriere
Se listen: Disse it-folk bliver ansat på stedet - cheferne skriger efter helt bestemte it-kompetencer
Der er en markant mangel på it-folk med helt bestemte kompetencer samtidig med, at it-cheferne er i gang med at øge bemandingen i it-organisationerne. Se listen med de mest efterspurgte it-kompetencer netop nu.
White paper
Mobility - her er de aktuelle udfordringer
Hvad med sikkerheden? Mobility-bølgen fejer igennem danske virksomheder, og der er masser af muligheder og faldgruber. Sikkerheden halter, men det kan der gøres noget ved. Produceret af Computerworld.dk i oktober 2014.