{"id":2859,"date":"2008-12-18T01:14:21","date_gmt":"2008-12-17T16:14:21","guid":{"rendered":"http:\/\/www.ibi-square.jp\/blog\/?p=103"},"modified":"2023-05-13T16:19:47","modified_gmt":"2023-05-13T07:19:47","slug":"tech-calc-rsi","status":"publish","type":"post","link":"https:\/\/atmtech.net\/main\/tech-calc-rsi\/","title":{"rendered":"RSI\uff08\u8a08\u7b97\u5f0f\u3001\u30c1\u30e3\u30fc\u30c8\u3001\u30a8\u30af\u30bb\u30ebVBA\u30b3\u30fc\u30c9\uff09\u30c6\u30af\u30cb\u30ab\u30eb\u6307\u6a19"},"content":{"rendered":"

 <\/p>\n

RSI\u306b\u3064\u3044\u3066\u3067\u3059\u3002\u8a08\u7b97\u5f0f\u3001\u30c1\u30e3\u30fc\u30c8\u3001\u30a8\u30af\u30bb\u30ebVBA\u30b3\u30fc\u30c9<\/h1>\n

 <\/p>\n

\u76f8\u5bfe\u529b\u6307\u6570\u3068\u8a33\u3055\u308c\u308b\u30aa\u30b7\u30ec\u30fc\u30bf\u7cfb\u306e\u6307\u6a19\u3067\u3001\u76f8\u5834\u306e\u5f37\u5f31\u306e\u50be\u5411\u3092\u6e2c\u308b\u6307\u6a19\u306e\u4e00\u3064\u3002<\/p>\n

 <\/p>\n

\u8a08\u7b97\u65b9\u6cd5\u306f\u904e\u53bbN\u672c\u306e\u5024\u4e0a\u304c\u308a\u5e73\u5747\u5024\u3001\u5024\u4e0b\u304c\u308a\u5e73\u5747\u5024\u3092\u57fa\u306b\u8a08\u7b97\u3055\u308c\u307e\u3059\u3002<\/p>\n

 <\/p>\n

\u8a08\u7b97\u65b9\u6cd5\u3001\u8a08\u7b97\u5f0f\u3001\u30c1\u30e3\u30fc\u30c8\u3001\u30a8\u30af\u30bb\u30ebVBA\u3092\u4e0b\u8a18\u63b2\u8f09\u3057\u3066\u307e\u3059\u3002<\/p>\n

 <\/p>\n

<\/p>\n

 <\/p>\n

 <\/p>\n

RSI\u306e\u8a08\u7b97\u5f0f\uff08N\u306f\u8db3\u6570\uff09<\/h2>\n

\u8a08\u7b97\u306e\u306f\u3058\u3081<\/p>\n

RSI = A \/ (A+B) \u00d7 100<\/p>\n

A = \u904e\u53bbN\u672c\u306e\u5024\u4e0a\u304c\u308a\u5e45\u5e73\u5747<\/p>\n

B = \u904e\u53bbN\u672c\u306e\u5024\u4e0b\u304c\u308a\u5e45\u5e73\u5747<\/p>\n

 <\/p>\n

2\u672c\u76ee\u4ee5\u964d<\/p>\n

RSI = A’ \/ (A’ + B’) \u00d7 100<\/p>\n

A’ = ( ( N -1 ) \u00d7 A + \u73fe\u5728\u306e\u8db3\u306e\u5024\u4e0a\u304c\u308a\u5e45 ) \/ N<\/p>\n

B’ = ( ( N -1 ) \u00d7\u00a0B + \u73fe\u5728\u306e\u8db3\u306e\u5024\u4e0b\u304c\u308a\u5e45 ) \/ N<\/p>\n

 <\/p>\n

 <\/p>\n

RSI\u306e\u30c1\u30e3\u30fc\u30c8<\/h2>\n

\"\"<\/p>\n

\u4e0a\u8a18\u30c1\u30e3\u30fc\u30c8\u3001\u9ec4\u8272\u7dda\u304c9\u672c\u3001\u8d64\u7dda\u304c18\u672c\u3001\u6c34\u8272\u7dda\u304c36\u672c\u306eRSI<\/p>\n

 <\/p>\n

 <\/p>\n

 <\/p>\n

RSI\u306eVBA\u30b3\u30fc\u30c9<\/h2>\n

‘\u203b\u3000\u30a8\u30af\u30bb\u30eb\u306e1\u5217\u76ee(A\u5217)\u306b\u884c\u756a\u53f7\u30012\u5217\u76ee(B\u5217)\u306b\u65e5\u6642\u3001
\n‘\u203b\u30003\u5217\u76ee(C\u5217)\uff5e6\u5217\u76ee(F\u5217)\u306b\u59cb\u5024\u30fb\u9ad8\u5024\u30fb\u5b89\u5024\u30fb\u7d42\u5024
\n‘********************************
\n‘ rsi \uff1aRSI\u306e\u63a1\u7528\u672c\u6570
\n‘ num\uff1a\u73fe\u5728\u306e\u884c
\n‘ cell_rsi\uff1aRSI\u8a08\u7b97\u5024\u66f8\u8fbc\u307f\u5217
\n‘ cell_sa : \u5168\u8db3\u6bd4\u66f8\u8fbc\u307f\u5217
\n‘ cell_up:\u5024\u4e0a\u304c\u308a\u5e45\u5e73\u5747\u66f8\u8fbc\u307f\u5217
\n‘ cell_do:\u5024\u4e0b\u304c\u308a\u5e45\u5e73\u5747\u66f8\u8fbc\u307f\u5217
\n‘********************************<\/p>\n

If cell(num – 1, 6) <> “” Then Cells(num, cell_sa) = _
\nCells(num, 6) – Cells(num – 1, 6)
\nIf cell(num – (rsi – 1), 6) <> “” Then
\nIf Cells(num – 1, cell_rsi) = “” Then
\nrsi_max = Application.SumIf(Range(Cells(num – (rsi – 1), _
\ncell_sa), Cells(num_1, cell_sa)), “>0”) \/ rsi
\nrsi_min = Abs(Application.SumIf(Range(Cells(num – (rsi – 1), _
\ncell_sa), Cells(num_1, cell_sa)), “<0”)) \/ rsi
\nCells(num, cell_up) = rsi_max
\nCells(num, cell_do) = rsi_min
\nCells(num, cell_rsi) = rsi_max \/ (rsi_max + rsi1_min) * 100
\nEnd If
\nIf Cells(num – 1, cell_rsi) <> “” Then
\nIf Cells(num_1, cell_sa) > 0 Then
\nrsi_max = (Cells(num – 1, cell_up) * (rsi – 1) + _
\nCells(num, cell_sa)) \/ rsi
\nElse
\nrsi_max = Cells(num – 1, cell_up) * (rsi1 – 1) \/ rsi
\nEnd If
\nIf Cells(num_1, 114) < 0 Then
\nrsi_min = (Cells(num – 1, cell_do) * (rsi – 1) – _
\nCells(num, cell_sa)) \/ rsi
\nElse
\nrsi_min = Cells(num – 1, cell_do) * (rsi – 1) \/ rsi
\nEnd If
\nCells(num, cell_up) = rsi_max
\nCells(num, cell_do) = rsi_min
\nCells(num, cell_rsi) = rsi_max \/ (rsi_max + rsi_min) * 100
\nEnd If
\nEnd If<\/p>\n

 <\/p>\n

\u30c6\u30af\u30cb\u30ab\u30eb\u6307\u6a19\u4e00\u89a7<\/a><\/p>\n

\u7f6b\u7dda\u8ac7\u7fa9\u4e00\u89a7<\/a><\/p>\n

(\u5916\u90e8\u30ea\u30f3\u30af)\u30c6\u30af\u30cb\u30ab\u30eb\u6307\u6a19(Wikipedia)<\/a><\/p>\n

 <\/p>\n","protected":false},"excerpt":{"rendered":"

  RSI\u306b\u3064\u3044\u3066\u3067\u3059\u3002\u8a08\u7b97\u5f0f\u3001\u30c1\u30e3\u30fc\u30c8\u3001\u30a8\u30af\u30bb\u30ebVBA\u30b3\u30fc\u30c9   \u76f8\u5bfe\u529b\u6307\u6570\u3068\u8a33\u3055\u308c\u308b\u30aa\u30b7\u30ec\u30fc\u30bf\u7cfb\u306e\u6307\u6a19\u3067\u3001\u76f8\u5834\u306e\u5f37\u5f31\u306e\u50be\u5411\u3092\u6e2c\u308b\u6307\u6a19\u306e\u4e00\u3064\u3002   \u8a08\u7b97\u65b9\u6cd5\u306f\u904e\u53bbN\u672c\u306e\u5024\u4e0a\u304c\u308a\u5e73\u5747\u5024\u3001\u5024\u4e0b\u2026 \u7d9a\u304d\u3092\u8aad\u3080 »<\/a><\/span><\/p>\n","protected":false},"author":1,"featured_media":2860,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[30],"tags":[53,50,80,36,54,52],"aioseo_notices":[],"_links":{"self":[{"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/posts\/2859"}],"collection":[{"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/comments?post=2859"}],"version-history":[{"count":5,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/posts\/2859\/revisions"}],"predecessor-version":[{"id":3665,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/posts\/2859\/revisions\/3665"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/media\/2860"}],"wp:attachment":[{"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/media?parent=2859"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/categories?post=2859"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/atmtech.net\/main\/wp-json\/wp\/v2\/tags?post=2859"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}