Avatar billede 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
Avatar billede b_hansen Novice
26. maj 2003 - 14:59 #1
Du henviser til filen t i linien "=AVERAGE(t!C" & x & ":C" & y & ")"

Det gøres i "t!"
Avatar billede b_hansen Novice
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 & ")"
Avatar billede 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.
Avatar billede b_hansen Novice
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
Avatar billede b_hansen Novice
26. maj 2003 - 15:19 #5
Selvfølgelig... der mangler jo nogle &-tegn:

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

der var et " formeget
Avatar billede bak Seniormester
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
Avatar billede bak Seniormester
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
Avatar billede 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?
Avatar billede b_hansen Novice
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'
Avatar billede bak Seniormester
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 & ")"
Avatar billede 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
Avatar billede bak Seniormester
27. maj 2003 - 17:28 #16
Ok, godt det funker :-)
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

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