abrir userform sem aparecer excel

[Tov Elen Shau]

Rachel

Verifica, por favor, se o erro ocorre em outras planilhas ou se é somente nessa mesmo, baixei aqui e não reproduziu esse erro.

Atenciosamente

Tov Elen Shau

[rachelgdias]

Rachel

Verifica, por favor, se o erro ocorre em outras planilhas ou se é somente nessa mesmo, baixei aqui e não reproduziu esse erro.

Atenciosamente

Tov Elen Shau

Bom dia Tov Elen Shau, infelizmente em TODAS. afffffff....... ódio..........

[rachelgdias]

Caso você queira manter a antiga planilha, as alterações no código que realizei foram;

‘EstaPasta_de_trabalho
Option Explicit
Private Sub Workbook_Open()
Application.Visible = False
UserForm2.Show
End Sub



‘UserForm2
Option Explicit

Private Sub CommandButton1_Click()
Application.Visible = True 'Visualizar Excel
Unload Me 'Fechar Userform
End Sub

Private Sub CommandButton2_Click()
Application.Visible = False
Unload Me
End Sub

Boa tarde,
printei minha tela pra voce ver o que acontece.... ele fica carregando......... (a tela verdadeira do excel esta invisivel, a planilha com as anotaçoes, mas depois ela aparece), pra depois abrir o userform de login.

Atenciosamente

Tov Elen Shau

Continua com erro..... vou te mandar a plan novamente.......

[Tov Elen Shau]

Rachel

Boa tarde


Infelizmente não consigo imaginar o que pode ter ocorrido em sua(s) planilha(s), estou pesquisando mas não encontrei nada parecido.


Tento reproduzir o erro aqui mas não acontece.

Continuo pesquisando, assim que encontrar te retorno.

Tov Elen Shau

[rachelgdias]

Rachel

Boa tarde


Infelizmente não consigo imaginar o que pode ter ocorrido em sua(s) planilha(s), estou pesquisando mas não encontrei nada parecido


Tento reproduzir o erro aqui mas não acontece.

Continuo pesquisando, assim que encontrar te retorno.

Tov Elen Shau

Obrigada Tov Elen Shaw,
Vcs são super atenciosos com a gente.... Fico aguardando ansiosa.... Muito obrigada mesmo...

[Tov Elen Shau]

Rachel

Verifica se o Word também está aparecendo esse erro.

Só vejo esse tipo de erro ocorrer quando eu tento abrir um arquivo que não seja do Excel no Excel, tipo tentar abrir um JPE ou um arquivo de PDF pelo Excel, dai esse caracteres aparecem. Mas deixo aberto aqui as nobres colega um pedido se suporte nesse tópico.

Alguma idéia Tomás, Reinaldo?



Continuo pesquisando a respeito...

[Reinaldo]

Quanto ao reportado:
"

...Rar!ϐs
§yt 0Ñ–:®«"óˆ(@íP3 Pasta1.xlsm°‡#!ÍÕ”fâ¹´Ï›8æÁ¹²NlžÆ³[ÝUg-åëý
ð^þ:%ŒuÄRÁPŒ"’€ ‘÷ÈB/J ``‚€Àä!½ú%/ì€ÿ²ÿû¨Où0%¤6æ×6Oó/)¼7²9.;¶5ONïÞÌi,vÝSÌ€>ðè:¯¥
x×6÷PvȘy6SJ°$Š\™¸ÿQ:¶¬éÖHVýxËËÒ<Ñ=¸ÚÃB2°*äAYĈˤ›K¼/«»©KÝu#Qk›ç„֏ËÝOŸlÊ×Íö%ùzÎ
K 4Ä™"tÛÖ„Rè_Y4RÏÜ:ÊÛ©;'œšŸ_5¼……ûn”[jôî'aÛõ‘zi\hÎN±9Èåß!gêjì<+–›JQË.%Ä×߉?´“±SJJ?ý@Ðç?7»9‹È±âªŒI*_Ž<‡Î¬qEÓl¶¾g6œ
µ¿Kö™àìz^w'HÁr®“ùÔ5'Ujwf4^%+iå4ã01]á›}ët ŽêøÓUŸfþdtJV£P½ÒçK¼äÑÚP§U_c­ß¡Û}à¹ãÙ%é<Œ³€ @îûLçth{ª$õ÷Ãw½{`O½ç³—®­­.λÑ@ÖpqÖÉä3Ú‹Ñ$#þw:u&øÓÔ

Tudo leva a crer que o arquivo compactado com RAR, foi aberto por algum leitor que não seja compativel com esse padrão
Veja se nas configurações de seu micro não está "setado" abertura de .Rar com um leitor de texto tipo notepad ou wordpad...
Todos arquivos abri normalmente sem erro algum.
Veja se o arquivo enviado pelo Tov, compactado em Zip consegue abrir

Pasta1.zip

(38.06 KiB) Baixado 213 vezes

Já a imagem no topico anteriro não acrescenta nada, pois apena mostra a interface do excel

[rachelgdias]

Quanto ao reportado:
"

...Rar!ϐs
§yt 0Ñ–:®«"óˆ(@íP3 Pasta1.xlsm°‡#!ÍÕ”fâ¹´Ï›8æÁ¹²NlžÆ³[ÝUg-åëý
ð^þ:%ŒuÄRÁPŒ"’€ ‘÷ÈB/J ``‚€Àä!½ú%/ì€ÿ²ÿû¨Où0%¤6æ×6Oó/)¼7²9.;¶5ONïÞÌi,vÝSÌ€>ðè:¯¥
x×6÷PvȘy6SJ°$Š\™¸ÿQ:¶¬éÖHVýxËËÒ<Ñ=¸ÚÃB2°*äAYĈˤ›K¼/«»©KÝu#Qk›ç„֏ËÝOŸlÊ×Íö%ùzÎ
K 4Ä™"tÛÖ„Rè_Y4RÏÜ:ÊÛ©;'œšŸ_5¼……ûn”[jôî'aÛõ‘zi\hÎN±9Èåß!gêjì<+–›JQË.%Ä×߉?´“±SJJ?ý@Ðç?7»9‹È±âªŒI*_Ž<‡Î¬qEÓl¶¾g6œ
µ¿Kö™àìz^w'HÁr®“ùÔ5'Ujwf4^%+iå4ã01]á›}ët ŽêøÓUŸfþdtJV£P½ÒçK¼äÑÚP§U_c­ß¡Û}à¹ãÙ%é<Œ³€ @îûLçth{ª$õ÷Ãw½{`O½ç³—®­­.λÑ@ÖpqÖÉä3Ú‹Ñ$#þw:u&øÓÔ

Tudo leva a crer que o arquivo compactado com RAR, foi aberto por algum leitor que não seja compativel com esse padrão
Veja se nas configurações de seu micro não está "setado" abertura de .Rar com um leitor de texto tipo notepad ou wordpad...
Todos arquivos abri normalmente sem erro algum.
Veja se o arquivo enviado pelo Tov, compactado em Zip consegue abrirPasta1.zip

Já a imagem no topico anteriro não acrescenta nada, pois apena mostra a interface do excel

Bom dia, baixei a planilha, nao aparece o excel, agora apenas aparece a interface do excel, (que acho que é aquela tela azul que aparece antes de abrir as abas do excel) TEM COMO OCULTAR A INTERFACE TAMBEM? POIS ELA FICA CARREGANDO ANTES DE INICIAR O USERFORM.

[Tov Elen Shau]

Reinaldo, obrigado por nos atender, foi muito importante teu suporte, eu não conseguiria sem ele, com certeza.


Rachel

Testei a planilha em anexo, ela oculta a interface do Excel (Não esqueça de descompactar antes de abrir). A dica que deixo é que você tenha um Userform com o nome MENU que tenha botões que Abrem os outros userform, tipo; Clientes, Contas, Fornecedores. Esses Userforms, ao serem abertos ou fechados fiquem com o MENU aberto atrás, sem ser fechado e apenas o MENU tenha o botão de SAIR, com as rotinas de Salvar, tipo a rotina abaixo;

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
ThisWorkbook.Save '----------Salvar as alterações
Application.Visible = True '-Visualizar Excel 'Salvar as alterações
Application.Quit '-----------Fechar o Excel.
End Sub


Deixei um pequeno exemplo na planilha pra te. Estou te enviando também um pacote de ícones, para o caso de você querer usar.


Atenciosamente

Tov Elen Shau

[rachelgdias]

Reinaldo, obrigado por nos atender, foi muito importante teu suporte, eu não conseguiria sem ele, com certeza.


Rachel

Testei a planilha em anexo, ela oculta a interface do Excel (Não esqueça de descompactar antes de abrir). A dica que deixo é que você tenha um Userform com o nome MENU que tenha botões que Abrem os outros userform, tipo; Clientes, Contas, Fornecedores. Esses Userforms, ao serem abertos ou fechados fiquem com o MENU aberto atrás, sem ser fechado e apenas o MENU tenha o botão de SAIR, com as rotinas de Salvar, tipo a rotina abaixo;

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
ThisWorkbook.Save '----------Salvar as alterações
Application.Visible = True '-Visualizar Excel 'Salvar as alterações
Application.Quit '-----------Fechar o Excel.
End Sub


Deixei um pequeno exemplo na planilha pra te. Estou te enviando também um pacote de ícones, para o caso de você querer usar.


Atenciosamente

Tov Elen Shau

Bom dia, vc pode mandar ele em ZIP, meu computador nao abre o arquivo RAR.