[Cthulu23]

Ma ktoś może z Was jakieś makro napisane w VBA, którym będzie można importować arkusz z excela? Chodzi mi o to żebym mógł dokładnie wybrać który plik chcę zaimportować, a po wybraniu będzie kopiował dane z arkusza A1 w pliku A do arkusza B2 w pliku B.
#excel #vba #pytanie #kiciochpyta #informatyka #programowanie

[matti05]

@Cthulu23: https://stackoverflow.com/questions/11978711/loading-a-worksheet-from-another-workbook-into-excel-with-vba

[Cthulu23]

@matti05: no to nie do końca, bo zamiast wkleić wszystko to krzyczy mi że ta nazwa jest zajęta i robi mi kopię arkusza B2 (2)

[matti05]

@Cthulu23: jak bardziej pogooglujesz to na pewno znajdziesz coś lepszego

[brak_nicku]

no to nie do końca, bo zamiast wkleić wszystko to krzyczy mi że ta nazwa jest zajęta i robi mi kopię arkusza B2 (2)

@Cthulu23: znacznie efektywniejszą metodą kopiowania jest skopiowanie całego arkusza a nie całej zawartości.

W podlinkowanym kodzie jest:

wb.Sheets(1).Move After:=targetWorkbook.Sheets(targetWorkbook.Sheets.Count)

To przenosi, aby skopiować:

wb.Sheets(1).Copy After:=targetWorkbook.Sheets(targetWorkbook.Sheets.Count)

Jeśli arkusz docelowy istnieje, to najlepiej go pierw usunąć:

Application.DisplayAlerts = False
On Error Resume Next
targetWorkbook.Worksheets("B2").Delete
On Error GoTo 0
Application.DisplayAlerts

[Cthulu23]

@pinkoryj: w pliku z którego kopiuje jest to jedyny arkusz, więc jest to o tyle łatwiejsze