AfonsoMira - Clube do Hardware
Sobre AfonsoMira
Data de Nascimento 29/02/2000 (21 anos)
HP IPM 17-DD
1 x Micron Technology MT16KTF1G64AZ-1G9P1 DDR3L 8GB
Dell HV90C L8H-128V2G-11 - 128GB
AfonsoMira respondeu ao tópico de Miguel Soldado Bulhões em Windows 10
@Miguel Soldado Bulhões Perdão me esqueci de uma parte do código. slmgr.vbs /ipk xxxxx-xxxxx-xxxxx-xxxxx-xxxxx Experimente agora.
AfonsoMira começou a seguir aviso automatico de vencimento e retorno ao cliente no excel vba, Erro: Não é possível ativar o Windows (0x8007007b) e (vba) agendamento de tarefa sexta-feira às 15:28
@Miguel Soldado Bulhões Boas, Tente a ativação através do CMD Pressione simultaneamente as teclas Windows + R e procure por CMD No CMD, digite o seguinte comando e pressione Enter: slmgr - ipk xxxxx-xxxxx-xxxxx-xxxxx-xxxxx Atenção: Onde está xxxxx trocar pela sua chave de ativação do Windows Reinicie o computador e verifique se esta ativado.
AfonsoMira respondeu ao tópico de El Gnomio em Placas de vídeo
Sim é um bom monitor. Já este adaptador você não vai precisar mesmo, pois sua placa de vídeo tem saída HDMI e o monitor tem porta HDMI. Vai é precisar de um cabo HDMI, caso não possua, para ligar um no outro.
AfonsoMira respondeu ao tópico de paulotuca em Microsoft Office
@paulotuca Veja se assim fica bom, Eu removi o botão editar pois é mais fácil apenas assim com o botão de salvar para não causar o erro. Com Botão - Relação de produtos - março.zip
Excel (vba) agendamento de tarefa
AfonsoMira respondeu ao tópico de Ismael Souza em Microsoft Office
@Ismael Souza Boas, Penso que o melhor seria criar um script com VBS puxando essas macros e depois com o agendador de tarefas do Windows agendar para rodar esse script. Por exemplo crie a seguinte Sub: Sub RodarMacros Call AbrirPlanoSop.AbrirSOP Call ArrumaPlano.Arruma Call Planejar.Plano End sub Depois crie o script abra um bloco de notas, cole o seguinte script e altere a extensão de ".txt" para ".vbs" Dim args, objExcel Set args = WScript.Arguments Set objExcel = CreateObject("Excel.Application") objExcel.Workbooks.Open args(0) objExcel.Visible= True
@paulotuca Então tem duas opções, aparecer mensagem ao abrir o userForm, ou criando um botão no mesmo para verificar retornos ou algo do tipo. Vou deixar os dois exemplos e você vê qual lhe dará mais jeito. Ao Abrir UserForm:Ao Abrir UserForm - Relação de produtos - março.zip Com botão: Com Botão - Relação de produtos - março.zip
@paulotuca Boas, Quer que a mensagem apareça quando se abre a planilha?
AfonsoMira começou a seguir GTX 1660 não aceita adaptador DVI-I para VGA e Raspberry pi 3 B+ não liga, so acende led vermelho! sexta-feira às 12:51
AfonsoMira respondeu ao tópico de Henrique makergames em Eletrônica
Se não tiver lá nenhum cartão SD o Pi não arranca. Acende a luz vermelha mas não arranca. Se com o cartão lá dentro ele continuar só com a luz vermelha ligada, então pode ser problema do cabo USB ou da fonte.
Se seu monitor suportar HDMI sim esse irá resolver! Quais as entradas do seu monitor?
@El Gnomio Pelo que sei isso é um adaptador DVI-I Dual Link para VGA. Pelas fotos a sua 750 tem saída DVI-I Dual Link enquanto que a 1660 tem saída DVI-D Dual Link Por isso que não encaixam. Exemplo em fotos: Saída da 750: Saída da 1660: Compre um adaptador HDMI para VGA.
Muito obrigado mesmo! É excelente ouvir isso! Sim é possível. Abra um novo tópico, que eu lhe tento ensinar a como fazer e utilizar.
Muito Obrigado Então troque este código: Private Sub txtC_Orcamento_Change() Planilha2.Range("W2") = txtC_Orcamento Call Filtro End Sub Por este: Private Sub txtC_Orcamento_Change() Planilha2.Range("W2") = txtC_Orcamento.Text Call Filtro End Sub Assim ele vai guardar o valor numérico como texto. Espero ter ajudado.
AfonsoMira respondeu ao tópico de Keu Borges em Microsoft Office
Tem razão me esqueci desse pequeno grande pormenor, peço desculpas.
@paulotuca Boas, Ainda não sou professor kkkkk Primeiramente você está a tentar copiar de uma folha para outra e o excel não permite isso com o filtro avançado. Por isso vai ter que colar na Planilha1 em vez da 2. Depois reparei que os cabeçalhos são diferentes, na ultima coluna tem "53" em uma tabela e em outra tem "51", fazendo com que aconteça um erro. Sugiro a seguinte alteração no código lembrando que agora invés de ir buscar os dados á Planilha2 de A1:Tx, terá que ir buscar à Planilha1 de V1:AOx. Sub Filtro() Dim filtrada As Range Dim
Queria saber se meu gabinete tem o tamanho para essa placa de vídeo
AfonsoMira respondeu ao tópico de AksonN em Placas de vídeo
Amigo eu editei a resposta pois tinha me enganado em vez de comprimento coloquei largura. Veja se de comprimento o seu gabinete, suporta os 15.2cm