Home Excel - Downloads / Areas Restritas Excel VBA - Aplicativo

Excel VBA - Aplicativo

  • - Acesso Livre
  • Documentos

    Ordenar por : Nome | Data | Acessos [ Descendente ]

    Excel vba aplicativo relaciona arquivos armazenados memoria Excel vba aplicativo relaciona arquivos armazenados memoria

    popular!
    Adicionado em: 31/12/2010
    Modificado em: 31/12/2010
    Tamanho: Vazio
    Downloads: 1275

    Saberexcel - o site das macros
    Esses procedimentos e declaraçãoes do Aplicativo Microsoft Excel VBA, verificam todos os arquivos que estão na memória do computador, adiciona um folha de planilha no livro ativo e relaciona todos esses arquivos


    Private Declare Function GetWindow Lib "user32" _
    (ByVal hwnd As Long, ByVal wCmd As Long) As Long
    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
    (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
    Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
    Private Declare Function GetWindowTextLength Lib "user32" _
    Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
    Private Declare Function GetWindowText Lib "user32" _
    Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, _
    ByVal cch As Long) As Long

    Const GW_HWNDFIRST = 0
    Const GW_HWNDNEXT = 2

    Sub criar_lista_arquivos_memoria()
    Dim CurrWnd As Long
    Dim Length As Long
    Dim TaskName As String
    Dim Parent As Long

    i = 1
    Sheets.Add 'cria uma planilha com a relação de arquivos na memoria do computador
    twnd& = FindWindow("Shell_traywnd", vbNullString)
    CurrWnd = GetWindow(twnd, GW_HWNDFIRST)

    While CurrWnd <> 0
    Length = GetWindowTextLength(CurrWnd)
    TaskName = Space$(Length + 1)
    Length = GetWindowText(CurrWnd, TaskName, Length + 1)
    TaskName = Left$(TaskName, Len(TaskName) - 1)

    If Length > 0 Then
    Cells(i, 1).Value = TaskName
    i = i + 1
    End If
    CurrWnd = GetWindow(CurrWnd, GW_HWNDNEXT)
    DoEvents
    Wend

    End Sub


    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA, sozinho, praticando com os produtos didáticos SaberExcel

    vba aplicativo excel lista personalizada vba aplicativo excel lista personalizada

    popular!
    Adicionado em: 11/02/2011
    Modificado em: 11/02/2011
    Tamanho: Vazio
    Downloads: 1200

    Saberexcel - site das macros

    Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), insere uma lista personalizada no Aplicativo Microsoft Excel
    As listas personalizadas são caracterizadas pelo preenchimento persolizado de células quando se arrasta células a partir do primeiro nome na célula
    Observe que quando voce acionar a macro, insere a Lista Personalizada, uma vez inserido a lista personalizada, ao tentar excecutar a macro novamente retorna uma mensagem que a referida lista de personalizada já foi criada.
    - veja no exemplo de planiha, abaixo faça o download do exemplo, se precisar.

    Sub Inserir_Lista_Personalizada()
    On Error GoTo sbError

    Application.AddCustomList ListArray:=Range("B2:B19")
    Range("D5").Select
    Exit Sub

    sbError:
    MsgBox "Lista personalizada criada, agora você poderá fazer o teste!", vbInformation, "Saberexcel"
    End Sub


    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application),sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel



    vba aplicativo fica invisivel mostra somente userform vba aplicativo fica invisivel mostra somente userform

    popular!
    Adicionado em: 21/11/2010
    Modificado em: 21/11/2010
    Tamanho: Vazio
    Downloads: 3385

    Saberexcel - o site das macros

    Este exemplo de Planilha do Aplicativo Microsoft Excel VBA, contém macro no Evento_Auto_Open que ao abrir o Workbook o Aplicativo fica invisível, mostrando um Userform, para visualizar o código voce poderá teclar [Alt + F11] para visualizar os códigos VBA e também o Userform usado.

    Sub Aplicativo_invisivel()
    Application.Visible = False
    UserForm1.Show
    End Sub


    Aplicativo Microsoft Excel VBA, SaberExcel VBA
    Aprenda sozinho, em casa, com baixo custo, excelente material didatico.







    PROMOÇÃO DIDÁTICOS SABEREXCEL



    Adquira já o Acesso Imediato
    à Area de Membros

    Compra Grantida --- Entrega Imediata

    Aprenda Excel VBA com Simplicidade de 
    códigos e Eficácia, Escrevendo Menos e
    Fazendo Mais.

    '-------------------------------------'
    Entrega Imediata:
    +  500 Video Aulas MS Excel VBA
    +  35.000 Planilhas Excel e VBA
    +  Coleção 25.000 Macros MS Excel VBA
    +  141 Planilhas Instruções Loops
    +  341 Planilhas WorksheetFunctions(VBA)
    +    04 Módulos Como Fazer Excel VBA
    +  Curso Completo MS Excel VBA
    +  Planilhas Inteligentes


    Pesquisa Google SaberExcel

    Publicidade Google

    <script type="text/javascript"><!--

    google_ad_client = "ca-pub-2317234650173689";

    /* retangulo 336 x 280 */

    google_ad_slot = "0315083363";

    google_ad_width = 336;

    google_ad_height = 280;

    //-->

    </script>

    <script type="text/javascript"

    src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

    </script>

    Publicidade

    RSFirewallProtected


    Google Associados

    Depoimentos

    Adicione Saberexcel Favoritos

     
     

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


       Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA