Ir para conteúdo
Fórum Script Brasil

FelipeSMorais

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Tudo que FelipeSMorais postou

  1. Boa tarde pessoal, tentei achar uma dúvida parecida, mas não encontrei. Em um código no UserForm ele abre uma planilha para o usuário editar, porém essa planilha aberta não está com o botão "fechar" habilitado, não é possível fechar, dessa forma o usuário tem que minimizar, voltar para o UserForm e acionar o botão "Fechar" que eu coloquei no formulário. Existe alguma forma de habilitar isso? 'Duplo clique na Revisão Private Sub Revisao_DblClick(ByVal Cancel As MSForms.ReturnBoolean) If ComboBoxListaProjetos.Text <> "" Then If rev = False Then Caminho = Caminho & "\" & SeparaNomes(Caminho) & " Desenvolvimento.xlsx" If lfVerificaArquivo(Caminho) = True Then Revisao.ForeColor = RGB(0, 255, 100) Workbooks.Open Filename:=Caminho Worksheets("Revisão Geométrica e Funcional").Activate rev = True Else MsgBox "Arquivo não encontrado" Exit Sub End If ElseIf rev = True Then Workbooks(SeparaCaminho(Caminho)).Close SaveChanges:=True rev = False Revisao.ForeColor = RGB(0, 0, 0) End If End If End Sub
  2. Boa Noite, tenho que verificar quantas vezes a palavra repete em um texto, ambos digitados pelo usuário, tenho uma cadeira na faculdade de algoritmo e aprendi até o inicio de ponteiros (acredito que não seja muita coisa), se alguém conseguir ver onde eu errei ou me dar alguma dica agradeço. Valeu! #include<stdio.h> #include<stdlib.h> #include<string.h> #include<locale.h> int conta_ocorrencia_palavra(char texto[1000], char palavra[50]){ char x=' ',aux[50]; int igual=0,c,c3,c2=0; for(c=0;c<=strlen(texto);c++){ if(texto[c]!=x){ aux[c2]=texto[c]; c2++; } if(texto[c]==x || c==strlen(texto)){ if(strcmp(aux,palavra)==0){ igual=igual+1; } for(c3=0;c3<strlen(aux);c3++){ aux[c3]='\0'; } c2=0; } } return igual; } main(){ setlocale(LC_ALL,"Portuguese"); char texto[1000],palavra[50]; scanf("%[^\n]s",texto); scanf("%s",palavra); printf("%d",conta_ocorrencia_palavra(texto,palavra)); system("pause"); }
×
×
  • Criar Novo...