MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Mudar nome de folha de excel via Access

    Compartilhe

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    [Resolvido]Mudar nome de folha de excel via Access

    Mensagem  serbarbosaportugal em Dom 24 Abr 2016, 21:14

    Boa noite

    Estou a usar, num projeto, o seguinte código do Mestre JP para importar de uma pasta vários documentos em excel:

    Código que importa de uma só vez, todas as folhas de excel que estiverem em c:\ para a tabela

    Private Sub SeuBotao_Click()
    Dim strPathFile As String, strFile As String, strPath As String
    Dim strTable As String
    Dim blnHasFieldNames As Boolean
    blnHasFieldNames = True
    strPath = "C:\" ' drive onde se situa o seu documento excel
    strTable = "tblExemplo" 'nome da tabela no seu banco
    strFile = Dir(strPath & "temp.xls") 'nome do seu excel, se mudar para "*.xls" importa todas as folhas excel _
    que estiverem em C:\ para a tabela do banco.
    Do While Len(strFile) > 0
    strPathFile = strPath & strFile
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, _
    strTable, strPathFile, blnHasFieldNames
    strFile = Dir()
    Loop
    End Sub

    A minha dificuldade é a seguinte: eu apenas pretendo ir buscar os dados à primeira folha dos documentos, cujo nome pode ser diferente de uma para outras.
    Como posso definir através do código acima, qual o nome a dar a folha ativa do excel para ir buscar apenas os dados desta???

    Mil obrigados!!

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Mudar nome de folha de excel via Access

    Mensagem  serbarbosaportugal em Qui 28 Abr 2016, 23:06

    Boas noites....

    Parece que ninguém consegue me ajudar. como faço para, selecionar o intervalo de dados a ser importado, apenas da 1.ª folha do excel, independente do respetivo nome??

    Obrigado

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Mudar nome de folha de excel via Access

    Mensagem  serbarbosaportugal em Sab 07 Maio 2016, 00:02

    Bem,,,,

    Não existe solução para a minha questão. Por isso, fecho o post!!

      Data/hora atual: Ter 12 Dez 2017, 17:52