Avatar billede Butterfly Ekspert
19. december 2017 - 12:27 Der er 17 kommentarer og
1 løsning

Excel på dansk eller engelsk

Hej
I firmaet har nogle Excel på dansk og andre på engelsk. Jeg har et program der laver et nyt ark, på dansk hedder det Ark1 på engelsk hedder det Sheet1.
Findes der en måde hvorpå jeg kan omgås navnet "Ark2" og "Sheet1" eller er jeg nødt til at lave en makro til dansk Excel og en til engelsk Excel?
Sådan har jeg p.t. løst det, men findes der noget smartere?
Avatar billede Butterfly Ekspert
19. december 2017 - 12:27 #1
Der skulle stå "Ark1"
Avatar billede Dan Elgaard Ekspert
19. december 2017 - 12:38 #2
Der er i9ngen grund til at lave en makro til dansk eller engelsk.

Hvad er det du forsøger, at opnå?
Avatar billede finb Ekspert
19. december 2017 - 12:40 #3
Disseker din makro, i vba hedder det altid sheet / sheets
Avatar billede igoogle Forsker
19. december 2017 - 12:42 #4
I stedet for at bruge navn som reference kan du bruge placering

https://msdn.microsoft.com/en-us/library/office/aa221564(v=office.11).aspx

så er din udfordring "blot" at holde arkene i samme rækkefølge
Avatar billede igoogle Forsker
19. december 2017 - 12:42 #5
Avatar billede Butterfly Ekspert
19. december 2017 - 12:56 #6
Det nye er rettere en ny mappe, hvor jeg kopiere nogle tal over af flere omgange. Når den nye mappe bliver oprettet hedder det henholdsvis Ark1 eller Sheet1, så der er ikke noget med rækkefølge.
Avatar billede igoogle Forsker
19. december 2017 - 13:52 #7
ok så kan du jo bruge index nr 1 til den opgave.
Avatar billede falster Ekspert
19. december 2017 - 18:32 #8
Måske lidt svært at forstå, hvad du helt præcist mener?

(Workbook = Excel-projektmappe = en Excel-fil)
Sheet = Ark = en "fane" i/en del af en Excelfil.)

Og som tidligere nævnt er vba-koden (altid) på engelsk.

Hvis de andre indlæg løser problemet, så se blot væk fra denne.

Held og lykke :-)
Avatar billede Jan Hansen Ekspert
19. december 2017 - 22:06 #9
Hvad med at lave arket med en macro

dim MySheet as Worksheet

sub NewSheet()
      Set MySheet=Sheets.add
      Mysheet.Name="NytArk"
End Sub

noget i den retning, ej testet

Jan
Avatar billede excelent Ekspert
20. december 2017 - 20:32 #10
Sub Add_Rename()
Sheets.Add After:=ActiveSheet
If Left(ActiveSheet.Name, 2) = "Sh" Then
ActiveSheet.Name = Replace(ActiveSheet.Name, "Sheets", "Ark")
Else
ActiveSheet.Name = Replace(ActiveSheet.Name, "Ark", "Sheets")
End If
End Sub
Avatar billede Dan Elgaard Ekspert
25. december 2017 - 09:18 #11
Det bedste er, at definere arket/fanen som et objekt - så er du helt ude af problemerne med navnet på arket - uanset om du benytter dansk, engelsk, japansk eller et, hvilket som helst, andet sprog.

Og, så benytter du dernæst blot objekt-variablen i dine henvisninger.
Avatar billede Butterfly Ekspert
03. januar 2018 - 14:04 #12
Godt nytår
Hvordan definere jeg arket/fanen som et objekt? For det lyder smart til andre ting også.
Avatar billede falster Ekspert
03. januar 2018 - 14:39 #13
Se Dans (#11) fortræffelige hjemmeside her

http://www.excelgaard.dk
Avatar billede Dan Elgaard Ekspert
03. januar 2018 - 15:36 #14
@Falster: Mange tak - *Rødme*Rødme*
Avatar billede Dan Elgaard Ekspert
03. januar 2018 - 15:37 #15
@Buttefly #13: Se Jan's indlæg #9, hvor han netop definer regnearket som et objekt.
Avatar billede store-morten Ekspert
03. januar 2018 - 18:27 #16
Hvis det er lige meget, om det på dansk hedder Ark1 eller på engelsk hedder Sheet1 og de ikke omdøbes, så prøv evt:
Sub Test1()
    Select Case Application.International(xlCountryCode)
    Case 1: Name = "Sheet"
    Case 45: Name = "Ark"
    End Select
   
    Sheets(Name & "2").Select
   
End Sub
Som vælger Ark2 i dansk version
og Sheet2 i Engelsk version
Avatar billede Butterfly Ekspert
04. januar 2018 - 16:58 #17
Mange tak for hjælpen, for pokker, hvor er I kloge, thumbs up
Avatar billede store-morten Ekspert
04. januar 2018 - 19:57 #18
Velbekomme ;-)
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
Kategori
Stort udvalg af Excel kurser til alle niveauer og jobfunktioner

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