Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketSprog - Google oversættelse

 Besvar Besvar
Forfatter
kbno Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 07.Feb.2011
Land: Danmark
Status: Offline
Point: 500
Direkte link til dette indlæg Emne: Sprog - Google oversættelse
    Sendt: 02.Mar.2013 kl. 15:27
Hej

Er der nogen der ved om det er muligt at lave opslag og oversættelse fra DK til ENG, evt via google.

Jeg har idag 2 kolonner, hvor af den første (A) indeholder en masse danske emner og i kolonne (B) har jeg selv oversat dem. Det skal senere bruges i en rapport.

Men jeg kunne godt tænke mig at ordet blev oversat automatisk, man er vel doven Wink

Nogen der kan hjælpe?
Hygge - Kim
Excel 365 DK user
Til top



Til top
Baden Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 04.Mar.2013
Land: Danmark
Status: Offline
Point: 42
Direkte link til dette indlæg Sendt: 06.Mar.2013 kl. 08:57
Hej Kim

I Excel 2010 findes der en oversætter på fanen Gennemse, men jeg tror ikke den kan sende resultatet ind i selve regnearket.
En ting må du dog love mig: BRUG IKKE GOOGLE! med mindre du selv er ret hård til sprog.
Et eksempel fra engelsk til dansk:Shipping som betyder forsendelse bliver af google oversat til skib! og det er ikke meget anderledes den anden vej, så vær meget forsigtig med google, det kan kun bruges, hvis man vil have en ide om, hvad der står, men du kan ikke tage det for gode varer.

Hilsen Per
Til top
kbno Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 07.Feb.2011
Land: Danmark
Status: Offline
Point: 500
Direkte link til dette indlæg Sendt: 06.Mar.2013 kl. 09:13
Hej Per

Den havde jeg ikke set - men kan som du selv påpeger desværre ikke selv sætte ind.

og ja Google er ikke særlig god, men til det jeg lige skal bruge kan det bruges og så må jeg selv lige tjekke det igennem bagefter Smile


Hygge - Kim
Excel 365 DK user
Til top
Baden Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 04.Mar.2013
Land: Danmark
Status: Offline
Point: 42
Direkte link til dette indlæg Sendt: 06.Mar.2013 kl. 09:19
Hej Kim

Du får aldrig en maskine til, at lave en korrekt oversættelse, så du skal under alle omstændigheder kontrollere det hele og så kan du vel lige så godt bruge excels oversættelse.
Desværre kan jeg heller ikke hjælpe dig videreDead
Til top
Baden Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 04.Mar.2013
Land: Danmark
Status: Offline
Point: 42
Direkte link til dette indlæg Sendt: 06.Mar.2013 kl. 09:29
Hej Igen

Jeg kom i tanke om, at jeg engang har set det med VBA, så jeg fandt lige et par links:
http://www.excelforum.com/excel-programming-vba-macros/817337-how-do-i-translate-text-from-one-language-to-another-with-vba.html

http://vbaexcel.eu/vba-macro-code/google-translate-by-internet-explorer-automation

Jeg tror du er nødt til, at bruge VBA, hvis du vil automatisere detSmile

Per
Excel 2010 DK bruger + 2003 og 2007.
Til top
kbno Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 07.Feb.2011
Land: Danmark
Status: Offline
Point: 500
Direkte link til dette indlæg Sendt: 13.Mar.2013 kl. 10:05
Takker - dem vil jeg få læst igennem.

Vender tilbage med svar Tongue
Hygge - Kim
Excel 365 DK user
Til top
Baden Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 04.Mar.2013
Land: Danmark
Status: Offline
Point: 42
Direkte link til dette indlæg Sendt: 13.Mar.2013 kl. 10:16
Hej Kim
 
Tak, jeg vil altid gerne høre om det kan bruges.
Excel 2010 DK bruger + 2003 og 2007.
Til top
kbno Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 07.Feb.2011
Land: Danmark
Status: Offline
Point: 500
Direkte link til dette indlæg Sendt: 13.Mar.2013 kl. 10:52
Hej Baden

Så fandt jeg en løsning. Der skulle som du skrev bruges VBA.

Følgende skal sættes ind i et modul.:

Public Function getGoogleTranslation(strSource As String, strSourceLang As String, strDestLang As String) As String
    Dim strURL As String, x As String

    strURL = "http://translate.google.com/translate_a/t?client=t&text=" & _
             Replace(strSource, " ", "%20") & _
             "&hl=en&sl=" & strSourceLang & _
             "&tl=" & strDestLang & "&multires=1&pc=0&rom=1&sc=1"

    With CreateObject("msxml2.xmlhttp")
        .Open "get", strURL, False
        .send
        x = .responseText
    End With

    getGoogleTranslation = Replace(Replace(Split(x, ",")(0), "[", ""), """", "")

End Function


Jeg vedlægger et simpelt ark hvor funktionen nemt kan tilpasses fra.

uploads/183/google_translate.xlsm
Hygge - Kim
Excel 365 DK user
Til top
Baden Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 04.Mar.2013
Land: Danmark
Status: Offline
Point: 42
Direkte link til dette indlæg Sendt: 14.Mar.2013 kl. 15:35
Hej Kim

Det lyder godt, tak for svaret.
Excel 2010 DK bruger + 2003 og 2007.
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk