Ir para conteúdo
Fórum Script Brasil

Samuel Carlos Ribeiro

Membros
  • Total de itens

    6
  • Registro em

  • Última visita

Sobre Samuel Carlos Ribeiro

Samuel Carlos Ribeiro's Achievements

0

Reputação

  1. Não encontrei como dar o post como Resolvido. Mas deixo aqui meu muito obrigado
  2. Bom dia Muito obrigado pelo retorno Sim tenho o Xampp instalado E todos os arquivos estão na mesma pasta. Se funcionou com vocês teria que esta funcionando aqui também. Qual será o erro? muito estranho
  3. Boa noite Estou fazendo um estudo em PHP, HTML, CSS e MySql, mas quando executo o script no navegado não esta aplicando o arquivo CSS, sou amador nessas linguagem, espero que tenham paciência. Segue os Códigos: .PHP <?php session_start(); if (isset($_GET['nome'])) { $_SESSION['lista_tarefas'][] = $_GET['nome']; } if (isset($_SESSION['lista_tarefas'])) { $lista_tarefas = $_SESSION['lista_tarefas']; } else { $lista_tarefas = array(); } include "template.php"; ?> .HTML <html> <head> <meta charset="utf-8" /> <title>Gerenciador de Tarefas</title> <link rel="stylesheet" href="tarefas.css" type="text/css" /> </head> <body> <h1>Gerenciador de Tarefas</h1> <form> <fieldset> <legend>Nova tarefa</legend> <label> Tarefa: <input type="text" name="nome" /> </label> <input type="submit" value="Cadastrar" /> </fieldset> </form> <table> <tr> <th>Tarefas</th> </tr> <?php foreach ($lista_tarefas as $tarefa) : ?> <tr> <td><?php echo $tarefa; ?> </td> </tr> <?php endforeach; ?> </table> <label> Descrição (Opcional): <textarea name="descricao"></textarea> </label> <label> Prazo (Opcional): <input type="text" name="prazo" /> </label> <fieldset> <legend>Prioridade:</legend> <label> <input type="radio" name="prioridade" value="baixa" checked /> Baixa <input type="radio" name="prioridade" value="media" /> Média <input type="radio" name="prioridade" value="alta" /> Alta </label> </fieldset> <label> Tarefa concluída: <input type="checkbox" name="concluida" value="sim" /> </label> <input type="submit" value="Cadastrar" /> </body> </html> .CSS /* tarefas.css */ /* Estilo geral da página */ body { font-family: Arial, sans-serif; background-color: #f4f6f8; margin: 20px; color: #333; } /* Título */ h1 { text-align: center; color: #0077cc; } /* Formulário */ form { margin-bottom: 20px; } fieldset { border: 2px solid #0077cc; border-radius: 8px; padding: 15px; margin-bottom: 15px; background-color: #fff; } legend { font-weight: bold; color: #0077cc; } label { display: block; margin: 10px 0; } /* Campos de entrada */ input[type="text"], textarea { width: 95%; padding: 8px; margin-top: 5px; border: 1px solid #aaa; border-radius: 5px; } /* Botões */ input[type="submit"] { background-color: #0077cc; color: white; border: none; padding: 10px 15px; border-radius: 6px; cursor: pointer; } input[type="submit"]:hover { background-color: #005fa3; } /* Tabela de tarefas */ table { width: 100%; border-collapse: collapse; background: #fff; } th, td { border: 1px solid #ddd; padding: 10px; text-align: left; } th { background-color: #0077cc; color: white; } tr:nth-child(even) { background-color: #f9f9f9; }
  4. Bom dia Estou acompanhando um curso online de Excel e vba, faço tudo conforme explicado nos vídeos, tenho uma caixa de combinação onde escolho a opção e na hora de salvar me aparece esse erro: "A variável do objeto ou variável do bloco 'With' não foi definida" O código usado é esse: Private Sub UserForm_Initialize() With cbxPermissao .AddItem "ADMINISTRADOR" .AddItem "OPERADOR" .AddItem "USUÁRIO" End With End Sub Entendo um pouco de vba, mas não estou entendendo esse erro se esta conforme o curso A diferença do Excel pode fazer com que de esse erro? Estou usando o Excel do Officce 2019 e o cursa esta sendo apresentado pelo 2010.
  5. Boa tarde Alyson Obrigado pelo retorno, e muito obrigado pela dica. Deu certo
  6. Boa tarde Estou tentanda executar meu projeto em Excel 2019 conforme vou concluindo a programação de algum objeto, esse erro esta acontecento no ListBox conforme o que segue abaixo; Erro em tempo de execução '380': Não é possivel definir a propriedade List. Valor de propriedade incalido Sub CarregaListBox() Dim wb As Workbook Dim sh As Worksheet Set wb = ThisWorkbook Set sh = wb.Sheets("clientes") wb.Activate sh.Activate lins = sh.Range("A1048576").End(xlUp).Row For i = 1 To lins With ListBox1 .AddItem .List(i - 1, 0) = sh.Cells(i, 1).Value .List(i - 1, 1) = sh.Cells(i, 2).Value .List(i - 1, 2) = sh.Cells(i, 3).Value .List(i - 1, 3) = sh.Cells(i, 4).Value .List(i - 1, 4) = sh.Cells(i, 5).Value .List(i - 1, 5) = sh.Cells(i, 6).Value .List(i - 1, 6) = sh.Cells(i, 7).Value .List(i - 1, 7) = sh.Cells(i, 8).Value .List(i - 1, 8) = sh.Cells(i, 9).Value .List(i - 1, 9) = sh.Cells(i, 10).Value .List(i - 1, 10) = sh.Cells(i, 11).Value .List(i - 1, 11) = sh.Cells(i, 12).Value .List(i - 1, 12) = sh.Cells(i, 13).Value End With Next i Set wb = Nothing Set sh = Nothing End Sub
×
×
  • Criar Novo...