• Forum Think Finance - Bolsa e Forex »
• Perfil de rs_trader »
• Mostrar Mensagens »
• Mensagens

Citação de: sempre_em_alta em 2020-09-30  22:01:22

Citação de: deMelo em 2020-09-30  20:36:49

Citação de: muze em 2020-09-30  20:21:37

Kralhes mesmo, boa deMelo!

Obrigado muze.

que merda é esta CRL? 30% em 2 semanas? assim estás a ficar como o neo, e tudo para ti kralhes!!! dá-lhe

Há que reconhecer os verdadeiros gurus desta m3rda!!!

Obrigado.

Sou o MAIOR kralhesssss

Citação de: rs_trader em 2020-09-28  11:48:06

Citação de: rs_trader em 2020-09-25  16:26:03

Ruben Dias vendido. Não ouviram pela primeira vez aqui.

Um jogador anunciado para vir a custo 0 para o Porto, ao Benfica custa 15M.

Cosmeticas.
Ruben Dias vendido por 53M€.
Otamendi vem a custo zero.
É mais esta a realidade

uma coisa q eu acho que ajuda no trading eh a meditacao, ajuda no controlo emocional

rstrader, tens posicoes?

Ser analista é bem mais facil que ser trader.

Daqui a 2 meses será facil olhar para trás e ver se isto foi ou não um toque nos 3200, que ja´era esperado desde o 1º dia de quedas após os máximos.

O problema que me assalta agora, é saber se o toque rectal foi feito, e vamos a um ressalto (vejam como misturo "assalta" com "rectal" para dar ressalto) até aos 3400, antes de nos desfazermos até aos 3000 ou mais além, ou se ainda não fizemos o dito toque, e portanto continuamos a aguardar os 3200 feitos em intraday com bastante segurança.

A diferença é entre abrir longos já, ou esperar mais um pouco.

A linha é nos 3200 ou nos 3220?

É impressão minha ou este Gonçalo ramos é matador?

Tirado daqui, acho que é isto que precisas fazer:

https://www.teachexcel.com/excel-tutorial/2015/overwrite-an-existing-file-using-vba-in-excel

Citar

Sub Save_File_Overwrite()

' Don't show confirmation window
Application.DisplayAlerts = False

' Save the current workbook as Test.xlsm
' 51 for regular file
' 52 for macro enabled workbook
ThisWorkbook.SaveAs "C:\Directory\Test.xlsm", 52

' Allow confirmation windows to appear as normal
Application.DisplayAlerts = True

End Sub

Sub PRNtoPRN()
    Dim xWs As Worksheet
    Dim xcsvFile As String
    For Each xWs In Application.ActiveWorkbook.Worksheets
        Application.DisplayAlerts = False
        xWs.Copy
        xcsvFile = "C:\MetaStock Data" & "\" & xWs.Name & ".PRN"
        Application.ActiveWorkbook.SaveAs Filename:=xcsvFile, FileFormat:=xlCSV
        Application.ActiveWorkbook.Saved = True
        Application.ActiveWorkbook.Close
        Application.DisplayAlerts = True
    Next
End Sub