Logo Hardware.com.br

Fórum

0

Colocar fórmula "SE" no VBA.

Na célula B9, o caminho que esta ali, eu preciso colocar no vba, assim fica tudo centralizado no código.

Será que poderiam me ajudar?

Não entendo nada de VBA...

Ela toca um som quando é verdadeira uma regra em "SE"

Isso vai na célula B9

=SE(OU('[INDICE TP-FUNDO.xlsx]Simulado'!$B$10="COMPRA";'[INDICE TP-FUNDO.xlsx]Simulado'!$B$12="VENDE");SoundMe();"AGUARDANDO")


############################

[HASHTAG]#If[/HASHTAG] Win64 Then

Private Declare PtrSafe Function PlaySound Lib "winmm.dll" _

Alias "PlaySoundA" (ByVal lpszName As String, _

ByVal hModule As LongPtr, ByVal dwFlags As Long) As Boolean

[HASHTAG]#Else[/HASHTAG]

Private Declare Function PlaySound Lib "winmm.dll" _

Alias "PlaySoundA" (ByVal lpszName As String, _

ByVal hModule As Long, ByVal dwFlags As Long) As Boolean

[HASHTAG]#End[/HASHTAG] If

Const SND_SYNC = &H0

Const SND_ASYNC = &H1

Const SND_FILENAME = &H20000

Function SoundMe() As String

'Updateby Extendoffice 20161223

Call PlaySound("c:\windows\media\Ring08.wav", _

0, SND_ASYNC Or SND_FILENAME)

SoundMe = ""

End Function

#############################


Eu consegui um amigo que tentou me ajudar. Mas esta dando esse erro agora...

O erro esta em anexo...
##############
O VBA dele esta logo abaixo:
###############

Na celula B9:
=SoundMe()
################

[HASHTAG]#If[/HASHTAG] Win64 Then
Private Declare PtrSafe Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As LongPtr, ByVal dwFlags As Long) As Boolean
[HASHTAG]#Else[/HASHTAG]
Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Boolean
[HASHTAG]#End[/HASHTAG] If

Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000


Function SoundMe() As String
Dim wbk As Workbook
Dim wsh As Worksheet
Set wbk = Workbooks("INDICE TP-FUNDO.xlsx")
Set wsh = wbk.Worksheets("Simulado")
If wbk.Range("B10").Value = "COMPRA" Or wbk.Range("B12").Value = "VENDE" Then
Call PlaySound("c:\windows\media\Ring08.wav", 0, SND_ASYNC Or SND_FILENAME)
End If
End Function
################
0

Console no windows

Pessoal estou querendo manter contato com meu micro aqui de casa que fica sempre no linux, quero acessa-lo via ssh, porém na empresa onde trabalho é win, já ouvi falar de consoles do linux que rodam no windows, qual vocês me recomendam?

Ah pode até ser o que acham essencial em disquete, smile.png mas gostaria de algum quer rodasse direto no win mesmo... para eu poder pegar os arquivos do meu micro.
0

asrock - problemas XP :( memo ? #foto

Comprei 1 asrock k7s8xe r3, + mem ddr 333, 256, hd.. axp 1600+

E tipo..
Nao Da pra instala xp frown.png
Tipo, trava, sempre.. "Instalando dispositivos" ae trava... sempre frown.png e da uma tela azul tipo.. frown.png
Ja tentei instala pelo win98, aparece
"A instalacao nao pode criar a lista de arquivos a serem copiados
O sistema nao pode encontrar o caminho especifico"

Por que isso ? agm ja teve ??

Win xp pro br :P

E tipo, ela nao tem pci lock , nem agp né ? pra da da OC.. smile.png

edit : foto
Clipboard17.jpg


http://img12.exs.cx/img12/1848/Clipboard17.jpg
0

kdelibs4c2 onde eu acho isso .deb de preferencia

Olá pessoal.
Estou com um probleminha aki, queria instalar o k9copy para copiar dvds q o Mitsu me indicou só q no meio do caminho tinha uma pedra ( ou melhor uma dependencia q se tornou uma pedra )hehehe.
bom como de costume pweguei o mirror do repositório do kino e atualizei a lista de pacotes dei um sudo apt-get install o pacote e veio a famosa frase .
falta kdelibs4c2 bom té ai thudo bem só q pelo apt num instala esse kdelibs fui no debian.org e baixei um pacote de libs para o kde hehe deu pau geral. depois q instalei a parada e agora alguem me ajuda por favor big_green.png
( kurumin big_green.png 6.0 final Amd2.8 HD 80GB 512RAM )
(Xp corporat :cry: )
E-mails :
marceloa@sonae.com.br
marcelo_ti@linuxmail.org(mercury,msn)
cultofcow@hotmail.com
Desde ja agradeço . big_green.png
0

Sites da China: comprar ou não comprar?

gALLera,
Este post visa compartilhar a minha experiência com a compra do site http://www.compradachina.com.br/. Eu sempre comprei produtos e serviços via internet, e até então não tinha tido nenhuma experiência desagradável. Entre as minhas experiências com sucesso estão uma de TV 42", notebook, netbook, passagens de avião e até supermercado.
No dia 20/7/2009 comprei um celular no valor de R$ 361,00. O mesmo foi enviado no dia 28/07/2009. Tudo corria bem mas tive o azar de ter o produto extraviado no Correio no dia 11/09/2009. Já entrei em contato várias vezes com a loja e não tive mais resposta. Simplesmente pararam de responder meus emails e não querem me devolver o dinheiro. Eu realmente NÃO recomendo comprar nestas lojas.

Já que perdi o meu, espero ter salvo o suado $$ dos outros compradores.
0

roteador como receptor

ola.
pego sinal de 2 redes sem fio(uma do emprego de minha irmã que so fica ligada durante o dia na semana e outra somente aos finais de semana) tenho as senhas e o acesso é consentido, so que é uma para cada lado. Não tenho opçao de trocar as antenas dos AP e a minha é omni de 9 dbi num encore usb.
Em um dos sinais pega bem, so que no outro é bem fraco. Ja tentei um cabo para a antena mas ele deve ter uns 12 mts para ficar em uma posiçao adequada, dae o sinal morre tambem pela perda.
Minha duvida é se posso colocar um roteador em modo cliente e deixar o roteador e a antena bem no alto, no telhado(usaria uns 2 mts de cabo da antena ate embaixo do telhado no roteador cliente) e faria a ligaçao do roteador cliente ate a placa de rede comum via cabo de rede pois acho eu o cabo aceita distancias maiores.
Isso funciona ou é delirio de quem não sabe muito de redes wifi?Pelo que consegui achar no saint GOOGLE diz que pra conectar em um AP da, mas nao achei nada que me diga se com essa montagem eu consigo ver e conectar outras redes ou ela fica especifica so para uma.
desculpe a extençao do post mas nem sei c consegui me fazer entender.
desde ja grato e desculpe alguma besteira.
0

Pedido de orientação para montar PC por volta de R$ 3.000,00

Passado quase 5 anos da ajuda que pedi para montar um PC, estou começando novamente a busca de informações e sugestões para montar um novo PC para trabalhar com edição de vídeo (Premiere e After Effects), CGI (3ds Max e Mental Ray) e jogos (principalmente World of Warcraft). Desde essa época que montei esse PC até hoje, passei por muita coisa na vida (desemprego, divórcio, depressão, novo relacionamento, ainda em depressão, etc.). Nem sei porque estou falando isso. Isso não é fórum do programa do Casos de Família do SBT, mas enfim...

Estou completamente por fora sobre hardware. Não tenho lido mais nada sobre nos últimos 4 anos e estou completamente perdido. Como eu disse no título do tópico, estou pretendendo montar um PC por volta de R$ 3.000,00 mas dessa vez gostaria de partir do princípio que usarei um processador da Intel e placa de vídeo da nVidia.

Gostaria, se possível, aproveitar as memórias RAM e HDs da assinatura. Provavelmente o monitor também será reaproveitado. O resto deverá ser tudo novo.

Enfim, por onde devo começar a pesquisa?

Desde já, agradeço a ajuda de todos...
0

K7N2 /\L ataca again: Queimou 2 processadores do meu amigo

e ae pessoal...
desculpem pelo longo texto! mas é uma estória estranha...quem poder ajudar eu agradeço!

Mt estranho o relato que foi me passado por um amigo meu hoje ao telefone. Ele comprou uma K7N2 Delta L da MSI, igual a minha e a muitos daqui do fórum, em uma loja daqui. Pois bem, tirou a bixinha pra testar...e botou o JYUHB famoso 1700+ nela, ligou o computador...e deu uns estalos...o cooler girava e parava...girava e parava, a placa não ligava de jeito nenhum e o D-BRACKET acusava uma sequência de leds que não existia no manual. Daí, o que ele fez ?

Tirou o 1700+ dele e botou o 1700+ palomino do pai dele pra testar...mesma coisa: estalos, os cooler giravam e paravam, o d-bracket louco e o sistema não ligava. Daí ligou pra mim pra saber se eu tinha alguma idéia...daí me veio algo na mente. Um amigo meu a pouco tempo me disse que o irmão dele (técnico) tirou o XP 1600+ dele para testar em uma PC-Chips que um cliente que não funcionava...e ao voltar o XP 1600+ pro computador dele, o XP não ligou mais e as suas bridges estavam pretas.

Daí eu falei pro meu amigo "rapaz, as suas bridges devem estar pretas e com um furinho no meio delas. Queimou as bridges" daí quando ele foi olhar...pqp! tinha queimado mesmo...tava exatamente como eu disse. A @#$@4 da K7N2 Delta L...agora pergunto: 1) Placa-mãe pode fazer isso!?!?!? nunca vi coisa igual 2) AMD é tão frágil pra queimar assim ?!??! vo voltar pra P4 :P 3) Tem como usar algo condutor ou é processador perdido ?

valeu pela paciência!!!

[]´s
0

Deployment Tools(sysprep) para windows 2003

Eu gostaria de saber se o sysprep ou Deployment Tools funciona no windows 2003. Executei ele, cliquei na opção fabrica, ai o pc reiniciou e quando fui clicar em lacrar novamente apareceu uma mensagem dizendo que tinha uma incompatibilidade entre o programa e o sistema operacional.
O programa so funciona no windows xp mesmo ou pq eu não deveria ter clikado em fabrica?
0

Seria isso um vírus???

Olá galerinha, axé pra todos...

Então, eh o seguinte, recetemente algumas teclas do meu teclado deixaram de funcionar misteriosamente, algumas teclas de funções e quase todas as numéricas - sem ser daquelas q são ativas pelo "NUMLOCK", as teclas normais q ficam juntas com as alfabéticas, logo acima...

Minha pergunta eh::

ISSO PODERIA SER ALGUM VIRUS, SPYWARE, MALWARES OU QQ PORCARIA DESSAS????

agradeço pela atenção.
0

Formado Em Ciência Da Computação???

Concebi algo muito interessante, porém não tenho os conhecimentos necessários para colocá-los em prática. Preciso de alguém que coloque "as peças" juntas (que na verdade já existem) que produzirão resultado novo. Esta pessoa precisa ser formada em ciência da computação. Desculpe-me se parece ser grosseiro de minha parte, mas infelizmente já fui vítima de "espertalhões" que literalmente tomaram posse das minhas idéias fizeream uma boa grana e me deram um "bejim, bejim, Tchau, tchau"!!!É, hoje eu consigo fazer piada como forma "terápica"...em fim, preciso de alguem que seja honesto e esteja afim de ficar MUITO MUITO MUITO RICO, por que este produto vai vender aos milhões ao redor do mundo! Mudei de idéia quanto à forma de pagamento. Me repasse o seu preço para o desenvolvimento dos trabalhos e nos restringiremos a este pagamento único. Idéia muito simples!
Desde já, Obrigado.

Cristóvão E.
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal