CALCULADORA POPUP para Microsoft Access

Novo   Download   Home 

Este utilitário é um COM add-in ou add-in (.mdb) programado em Microsoft® Visual Basic® for Application (VBA) que gera uma calculadora popup clássica no Microsoft® Access® para capturar valores, operar e inserir resultados. Veja as figuras abaixo.

Ele consiste de um único arquivo, o AccessCalculator.dll, que é de aproximadamente 270 kb em tamanho e pode ser instalado automaticamente. Exceto para a DLL, nenhuma outra configuração é salva no Registro do Microsoft® Windows®. Sua configuração é salva no arquivo AccessCalculator.ini que é criado e mantido pelo próprio utilitário. Você pode desinstalá-lo total e automaticamente, não deixando nenhuma sujeira no Registro do seu Windows ou disco.

Itens a seguir nesta página:

Características

Download

Figuras

Função fCalculator()

Características:

- Popup em tamanho reduzido;

- Popup próximo ao cursor do mouse ou opcionalmente na última posição salva;

- Pode popup em dois formatos: normal e com fita de papel;

- Adição, subtração, multiplicação e divisão;

- Suporta casas decimais flutuantes, casas decimais limitadas no resultado e casas decimais limitadas ao inserir valores com memória de configuração independente para cada opção;

- Casas decimais limitadas ao inserir valores são também fixas como padrão enquanto o valor é inserido, mas liberadas temporariamente se o separador de decimais for digitado;

- Suporta limitar até 9 casas decimais no resultado;

- Suporta limitar até 9 casas decimais ao inserir valores. Neste caso, se positivo, o resultado também fica limitado de igual modo sem perder sua configuração;

- Suporta ainda casas decimais negativas ao inserir valores. Neste caso, o valor é automaticamente multiplicado por 10 para cada casa decimal de forma fixa enquanto é inserido e o resultado fica limitado ao definido em sua configuração;

- Raiz quadrada;

- Memória;

- Troca o sinal do número no visor;

- Operação com constante;

- Fita de papel;

- Imprime a fita de papel;

- Captura e insere na seleção;

- Ao capturar, se houver um texto selecionado em vez de um valor, seja uma coluna de tabela ou um misto de número e texto, e se existir mais de um número, todos serão devidamente filtrados com seus respectivos sinais, adicionados e o resultado inserido no visor como valor inicial;

- Insere e fecha imediatamente. Dica! Baixa a tecla Ctrl para inserir sem fechar;

- Insere sem quebrar a corrente do comando ‘Desfazer’ do Access em curso e qualquer inclusão pode ser desfeita, normalmente, por ele mesmo

- Pode ser chamado pelo botão direito do mouse (Menu de Contexto), ou por um botão em uma barra de ferramenta do Access (Guia Suplementos da Faixa de Opções 2007, 2010 ou 2013);

- Permite múltiplas instâncias em uma única instância do Access com controles, configurações e resultados independentes. Em quantidades práticas, não há limites para o número de instâncias simultâneas;

- Controles Exibir Papel em todas as instâncias abertas ou algumas delas podem ser atados para definir simultaneamente;

- Controles atados são distinguidos por asteriscos no título;

- A característica de múltiplas instâncias pode ser desabilitada;

- O tamanho do display pode ser ajustado pelas bordas para aumentar o tamanho da fonte de 8pt para até 32pt ou diminuir até 3pt;

- Pode copiar o valor no display para Àrea de Transferência do Windows. Dica! Ao inserir com a tecla Shift pressionada, o resultado será desviado para Àrea de Transferência;

- Pode colar no display valor existente na Área de Transferência do Windows;

- Aceita as seguintes teclas de atalho que possibilitam pegar valor, fazer operações e inserir resultados usando apenas o teclado:

- Popup Calculadora: Nenhuma
- Números e operações: teclas correspondentes no teclado
- Raiz quadrada: @
- Sinal de igualdade: Enter or =
- OK (Sinal de igualdade, inserir e fechar): O, seta para cima, seta para baixo ou Tab (Dica! Baixe a tecla Ctrl para inserir sem fechar)
- Fechar: ESC
- C: C
- AC: A
- M+: P
- M-: S
- MR: R
- Colar a partir da Área de Transferência do Windows: Ctrl + V
- Copiar para Àrea de Transferência do Windows: Ctrl + C Dica! Ao inserir com a tecla Shift pressionada, o resultado será enviado para Àrea de Transferência;

- A face pode ser configurada em: cor e figura de segundo plano, em transparência do visor e de controles e ocultação da barra de título clássica;

- A última configuração aberta ou a configuração da última instância fechada será usada como padrão na próxima nova instância;

- Possui comandos no menu para restaurar todas as configurações padrão;

- Todas as instâncias rodando podem ser fechadas com um único clique selecionando o comando ‘Fechar Tudo’ no menu;

- Pode ser chamado diretamente a partir de qualquer código VBA através da função fCalculator(). Veja, logo abaixo das figuras, uma descrição detalhada desta função e exemplos de aplicativos em VBA que a usam;

- Modal e não modal;

- Som;

- Ocupa menos de 270 Kb quando instalada.

Download:

Testado no Access para Windows, versões 2000, 2002(XP), 2003, 2007, 2010 (32-bit), 2013 (32-bit), 2016 (32-bit) e 2019 (32-bit) em instalações MSI-based e Click-To-Run do Office 365™ de serviços baseados na nuvem.

Veja também para Microsoft Excel®, para Microsoft PowerPoint® e para Microsoft Word.

Figuras:

Função fCalculator():

O calculadora pode ser chamado diretamente a partir de qualquer código VBA através da função fCalculator() que tem estes 8 argumentos opcionais:

1 - IniValue (Valor inicial no display, Padrão=0)

2 - DecimalsInResult (Long 0 a 9, Padrão=2 mas inicia flutuante)

3 - DecimalsEnterFix (Long 0 a 9 e -1 a -9, Padrão=2 mas inicia flutuante ou limitado se DecimalsInResult definido)

4 - WaitAndRetValue (Long 0 a 2, Padrão=2). Onde:
     0 - Não retorna valor, não assíncrona e não modal
     1 - Retorna valor, assíncrona e não modal
     2 - Retorna valor, assíncrona e modal

5 - FontDisplaySize (Long 3 a 32, Padrão=8)

6 - ShowPaper (Boolean, Padrão=Falso)

7 - LeftPos (String, Padrão="0")

8 - TopPos (String, Padrão="0"). Onde LeftPos e TopPos são as distâncias em pontos (1/72 polegadas) do centro da lateral esquerda do calculadora para a posição atual do mouse. Se os valores forem precedidos por $ (cifrão), LeftPos e TopPos passam a ser as distâncias do canto superior esquerdo do calculadora para o canto superior esquerdo fixo da tela. E ainda, se houver apenas o $ sem número, será usada a posição padrão atual.

Exemplos:

1 - O código abaixo chama o calculadora em modal para retornar resultado como Double para um formulário.

Sub YourSub1()
    Dim ObjToVBA As Object
    Set ObjToVBA = Application.COMAddIns("AddInAcCalculator.AccessDesigner").Object
    fRet = ObjToVBA.fCalculator(IniValue)
End Sub

2 - O código abaixo chama o calculadora em não modal para retornar resultado como no comando de clique direito.

Sub YourSub2()
    Dim ObjToVBA As Object
    Set ObjToVBA = Application.COMAddIns("AddInAcCalculator.AccessDesigner").Object
    Call ObjToVBA.fCalculator(IniValue, , , 0)
End Sub

3 - Idem para capturar e retornar resultado para a seleção ativa.

Sub YourSub3()
    Dim ObjToVBA As Object
    Set ObjToVBA = Application.COMAddIns("AddInAcCalculator.AccessDesigner").Object
    Call ObjToVBA.fCalculator
End Sub

Sobre Add-in (.mdb):

Indisponível temporariamente.

Mais informação

Home