logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Excel - Brak polskich znaków przy pobieraniu danych

Tomarekss 17 Cze 2015 14:53 1746 0
REKLAMA
  • #1 14779093
    Tomarekss
    Poziom 1  
    Posty: 1
    Mam problem z polskimi znakami przy pobieraniu danych.
    Poprzez kwerendę łącze się z cennikiem na stronie za pomocą Adresu. Zaznaczam tylko pole, które dotyczy listy produktów i cen.
    Pobierają mi się tabele, produkty i ceny, ale przy polskich znakach pokazują się krzaki.

    Z tego kodu VB korzystam:

    ChDir "T:\XXXXXX\materialy\" 
        Workbooks.Open Filename:= _ 
            "T:\XXXXXXX\materialy\materiały 13.xlsm" 
        ActiveWorkbook.RefreshAll 
        Columns("J:K").Select 
        Selection.Delete Shift:=xlToLeft 
        Rows("2:2").Select 
        Selection.Delete Shift:=xlUp 
        Rows("303:303").Select 
        Selection.Delete Shift:=xlUp 
        Range("B7").Select 
        ActiveCell.FormulaR1C1 = "koniec" 
        ChDir "XXXXXXXX\materialy\gotowe" 
        ActiveWorkbook.SaveAs Filename:= _ 
            "T:\eSklep\XXXXXXXXX\materialy\gotowe\materiały 13.xls" _ 
            , FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _ 
            ReadOnlyRecommended:=False, CreateBackup:=False 
        ActiveWindow.Close


    Czy spotkaliście się już z takim problemem ? Będę wdzięczny za wszystkie odpowiedzi.
  • REKLAMA
REKLAMA