Hirdetés

Új hozzászólás Aktív témák

  • grampus

    csendes tag

    Sziasztok!

    A segítségeteket szeretném kérni, hogyan tudom egy másik fájl adatainak átmásolásnál a szövegként tárolt számokat számmá átalakítani. Az alábbi makró sorokat használom:

    'Kiegészítő adatok másolása
    Workbooks.Open Filename:=ThisWorkbook.Path & "\Kiegészítő adatok.xls"
    Range("B2:B22").Select
    Selection.Copy
    Windows("Adatok.xlsm").Activate
    Sheets("Forrás-Kiegészítő adatok").Select
    Range("B2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Range("A1:B1").Select
    Windows("Kiegészítő adatok.xls").Activate
    Application.CutCopyMode = False
    ActiveWindow.Close

    Mivel kellene kiegészítenem?
    Köszönöm!

Új hozzászólás Aktív témák