Páginas

▼
29/11/2020

Dois canais analógicos PWM com PIC 18F4550

›
Código feito em CCS C Compiler #include <18F4550.h> #fuses INTRC_IO, NOWDT, NOMCLR #use delay(clock = 4MHz) void main(){    setup_time...
27/11/2020

Formulário MultiPage com Excel VBA

›
25/11/2020

Formulário com OptionButton no Excel VBA

›
Excel 2010
22/11/2020

Formulário ProgressBar com Excel VBA

›
Código feito em Visual Macro Private Sub btn_somar_Click() Dim soma As Long 'Carregando na mesma proporção Me.pg_status.Min = 2 Me.pg_st...

Opções com menu PIC 16F628A

›
Código feito em CCS C Compiler #include <16F628a.h> #fuses INTRC_IO, NOMCLR, NOWDT #use delay(clock = 8MHz) #define use_portb_lcd true...

Modificando HTML #02

›
<! DOCTYPE   html > < html > < head >      < meta   charset = 'UTF-8' >      < title > Modificando HTM...

Modificando HTML #01

›
<! DOCTYPE   html > < html > < head >      < meta   charset = 'UTF-8' >      < title > Modificando HTM...

Formulário de análise em Excel VBA #01

›
Código1 feito na Visual Macro Sub relatorio() Dim produtos_vendidos As Long Dim produtos_totais As Long produtos_vendidos = WorksheetFunctio...

Fazendo formulário em Excel VBA #03

›
Excel 2010 Código utilizado: Private Sub ToggleButton1_Click() 'variáveis Dim num1 As Long Dim num2 As Long 'atribui valor que estiv...
21/11/2020

Fazendo um formulário em Excel VBA #02

›
Excel 2010

Fazendo um formulário em Excel VBA #01

›
Excel 2010

Relógio em LCD com PIC 16F628A

›
Software Proteus versão: 7.6 Código feito em CCS C Compiler #include <16f628a.h> #fuses intrc_io,nowdt,nomclr//fuse bits #use delay (c...

Acessando classes em HTML

›
<! DOCTYPE   html > < html > < head >      < meta   charset = 'UTF-8' >      < title > Acessando Class...

Acessando atributos em HTML

›
<! DOCTYPE   html > < html > < head >      < meta   charset = 'UTF-8' >      < title > Acessando Atrib...
15/11/2020

Acessando os atributos #01 em HTML

›
<! DOCTYPE   html > < html > < head >      < meta   charset = 'UTF-8' >      < title > Acessando Atrib...

Sintetizador de voz com Macro em Excel VBA

›
Excel 2010 Private Sub UserForm_Activate() Dim hora As String Dim qtprodutosnv As Long qtprodutosnv = WorksheetFunction.CountIf(Plan1.Column...

Mensagem com box em Excel VBA

›
Excel 2010 Sub testes() MsgBox "OPERAÇÃO REALIZADA COM SUCESSO !", vbInformation MsgBox "ERRO !", vbCritical MsgBox ...

Loop para remover formulas no Excel VBA

›
Excel 2010 Sub retirar() Plan1.Range("E2:F31").Select For Each x In Selection     x.Value = x.Value Next MsgBox "OPERAÇÃO REA...

Impressão, atalhos, ocultar e esconder planilha no Excel VBA

›
Excel 2016 Sub imprimir() 'imprimindo os conteúdos da planilha 3 Plan3.PrintOut MsgBox "PLANILHAS IMPRIMIDAS COM SUCESSO !" En...
14/11/2020

Estrutura Condicional em Excel VBA

›
Excel 2016 Sub relatorio() Dim vtotal As Long Dim ltotal As Long For contlinhas = 2 To 20 vtotal = Cells(contlinhas, 2).Value ltotal = Cells...
13/11/2020

Estrutura de repetição FOR em Excel VBA

›
Excel 2010 Sub relatorio() Dim vtotal As Long Dim ltotal As Long For contlinhas = 2 To 20 vtotal = Cells(contlinhas, 2).Value ltotal = Cells...
10/11/2020

Variáveis em Excel VBA

›
Excel 2010 Sub testarVariaveis() Dim nome As String Dim idade As Integer nome = "Henrique" idade = 34 MsgBox ("seu nome é: ...
05/11/2020

Método End em Excel VBA

›
Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell.End(xlDown).Select End Sub ________//________ Private Sub Worksheet_...
04/11/2020

Método Offset em Excel VBA

›
Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell.Offset(1, 0).Value = "Abaixo" ActiveCell.Offset(-2, 1).Val...
03/11/2020

Selecionar elementos em HTML #02

›
<! DOCTYPE   html > < html > < head >      < meta   charset = "UTF-8" >      < title > Selecionar El...

Eventos da planilha com Excel VBA #01

›
Excel 2010 Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveCell.Value = "ALTERADO" End Sub Excel 2010 Private S...

Funções na planilha com Excel VBA #02

›
Excel 2010 Sub total() Range("f3").Value = WorksheetFunction.CountA(Plan1.Columns("a")) - 1 Range("g3").Value ...
02/11/2020

Funções na planilha com macro no Excel VBA #01

›
Sub total() Range("g3").Value = WorksheetFunction.CountA(Plan1.Columns("a")) - 1 End Sub

Função com macro no Excel VBA

›

Gravação de macros no Excel VBA

›
01/11/2020

Selecionar elementos em HTML #01

›
<! DOCTYPE   html > < html   lang = "en" > < head >      < meta   charset = "UTF-8" >      < ...