平凡な会社員のトレード日誌

日本株のシステムトレード記録。年率50%を目標にExcelを使い自動売買しています。

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
  1. --/--/--(--) --:--:--|
  2. スポンサー広告

売買処理(脱出処理)

「売買記録」シートに日付、手仕舞い金額、損益を入力(セット)します。
私の場合、後で分析する時に楽なので勝ち(1)負け(0)をこの時セットしています。

VBAは、次の通りです。

Function 脱出処理()
 Sheets("売買記録").Cells(h, 6) = Cells(j, 1)
 Sheets("売買記録").Cells(h, 7) = Cells(j, 2) * 100
'OmegaChartのCSVデータは小数点第2位なので100倍して整数に変換
 Sheets("売買記録").Cells(h, 8) = Sheets("売買記録").Cells(h, 4) * (Sheets("売買記録").Cells(h, 5) + Sheets("売買記録").Cells(h, 7))
 If Sheets("売買記録").Cells(h, 8) > 0 Then
   Sheets("売買記録").Cells(h, 9) = 1
 Else
   Sheets("売買記録").Cells(h, 9) = 0
 End If
h = h + 1
End Function
スポンサーサイト
  1. 2007/03/18(日) 18:19:43|
  2. Excel検証・フィルタ
  3. | トラックバック:0
  4. | コメント:0

コメント

コメントの投稿


管理者にだけ表示を許可する

トラックバック

トラックバックURLはこちら
http://kojimaro.blog70.fc2.com/tb.php/212-d319d5dc
この記事にトラックバックする(FC2ブログユーザー)

FC2Ad

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。