Boas,
Eu tenho um userform com botões "Pré-visualizar", "Exportar .xls", e "Sair".
Tenho uma macro para pré-visualizar as folhas escolhidas que é a seguinte:
Private Sub CommandButton1_Click()
Dim Ctl As Control, sArray()
ReDim sArray(0)
For Each Ctl In Me.Controls
If TypeOf Ctl Is MSForms.CheckBox Then
If Ctl Then
sArray(UBound(sArray)) = Ctl.Tag
ReDim Preserve sArray(UBound(sArray) + 1)
End If
End If
Next
If UBound(sArray) = 0 Then MsgBox ("Nenhum item selecionado"): Exit Sub
ReDim Preserve sArray(UBound(sArray) - 1)
Sheets(sArray).Select
Unload Me
Application.Dialogs(xlDialogPrintPreview).Show
Sheets("Menu").Select
Gostaria de criar uma macro semelhante para exportar as abas selecionadas para um novo ficheiro, mas sem formulas, apenas valores.
Tem como ajudar? Obrigado.
Boa tarde Shroeder,
Anexe um planilha de exemplo, assim fica mais fácil ajudar.
att,
Desculpa a demora.
No botão "exportar" do userform, ele imprime as folhas selecionadas.
O que eu quero é que em vez de imprimir, ele copie as abas para outra planilha só com valores.
Obrigado.
Boa noite Shroeder,
Olhe o código que adicionei no botão 'Exportar'.
Veja se é o que deseja, qualquer dúvida é só perguntar.
att,
Obrigado pela ajuda.
Quando seleciono mais do que uma aba, ele só exporta a primeira.
Tudo o resto está ok.
Obrigado.
Alterei o código e já consigo exportar mais abas.
O problema é que apenas a primeira fica sem valores. Não estou a conseguir ultrapassar este problema.
Obrigado.
Estou matando a cabeça e não tem como.
Só consigo colar a primeira aba como valores.
Cmps