10 seconds view

변경사항  - 삼양옵틱스 추가(연말배당에서 분기배당으로 전환)  - 씨젠 추가  - 코스닥/코스피 구분 (투자의 책임은 항상 본인에게 있음, 틀린 정보가 있을 확률이 매우 높음)

 1) Update 그래프 추가 배당락 update '22년 예상 배당금 변경(HD현대 올랐음, POSCO홀딩스 내렸음) 2) 주요 특징 대부분 2주 전보다 주가가 올랐음 효성, 한화3우B는 2주 전보다 아직 안올랐음 (투자의 책임은 항상 본인에게 있으며, 정보는 하루에 조금씩 업데이트 중이라 틀릴 확률이 매우 높음)

1) Update 그래프 추가 색칠한 5 종목 update 2) 리츠 특징 배당 가능 이익의 90% 이상을 의무적으로 배당 퇴직연금계좌에서 리츠 투자 가능 ISA에서는 리츠 투자 안 됨 ISA에서는 리츠관련 ETF 투자 가능 1월, 4월, 7월, 10월 배당락 없음 에이리츠는 매출이 떨어지고 있으므로 제외 아래의 정보는 완벽한 정보가 아닌 하루에 조금씩 update하고 있음 (투자의 책임은 본인에게 있으며, 투자 권유가 아닌 나의 투자를 위한 공부 블로그입니다.)

 변경사항 - 그래프 이쁜 거로 변경 - '22년 예상 배당금이 올라갔음(BNK, JB 등) - '22년 예상 배당금이 내려갔음(DGB, 하나 등) - 드디어 BNK금융지주가 '22년 예상 배당률 10% 찍었음 - 카카오뱅크 주식 산 거 완전 후회하고 있음(현재 -60% ㅠㅠ) - 글씨체가 좀 안 이쁜 거 같다~ - 은행가서 예적금하는 것보다 은행주를 사는게 더 유리할 듯 (투자의 책임은 항상 본인에게 있습니다.)

 Sub stock_v4() 'v1 today stock price 'v2 timer 'v3 exchange rate 'v4 PBR, WTI     Dim ie As InternetExplorer     Dim strURL As String     Dim i As Integer     Dim start_time As Single     Dim end_time As Single     Dim wti_temp_1 As String     Dim wti_temp_2 As String     Dim wti As Variant          start_time = Timer          Range(Range("D3"), Range("D3").End(xlDown)).ClearContents     For i = 3 To Range("C1000").End(xlUp).Row         Set ie = CreateObject("InternetExplorer.application")         strURL = "https://finance.naver.com/item/coinfo.nhn?code=" & Range("C" & i)         ie.Navigate strURL         ie.Visible = False         Do While (ie.ReadyState <> READYSTATE_COMPLETE Or ie.Busy = True)          ...

변경사항 - 그래프 추가 - 유가 추가 - 비고 update - 토스뱅크(비상장) 추가 - 기업은행 '22년 예상 배당금 845에서 846으로 증가했음 기본적으로 은행주들은 주가 움직임이 무거운 거 같음 주가가 더 내려가 기업은행 배당률이 9%대까지 올라왔음 종목 선정할 때 항상 1등 회사를 사라고 하는데 그럼 KB금융인데~ 아~ 분기 배당이라서 그런지 배당률이 너무 낮다. (투자의 책임은 항상 본인에게 있습니다.)

1) Update  - 배당 주기  - 비고란에 금리 인상 영향 표시  - 에이리츠 제외하고 상장된 리츠 전부 포함시켰음 2) 리츠 특징 배당 가능 이익의 90% 이상을 의무적으로 배당 퇴직연금계좌에서 리츠 투자 가능 ISA에서는 리츠 투자 안 됨 ISA에서는 리츠관련 ETF 투자 가능 1월, 4월, 7월, 10월 배당락 없음 에이리츠는 매출이 떨어지고 있으므로 제외 이전 게시물

Sub wti_v2()     Dim ie As InternetExplorer     Dim strURL As String     Dim wti_temp_1 As String     Dim wti_temp_2 As String     Dim wti As Variant              Set ie = CreateObject("InternetExplorer.application")         strURL = "https://search.naver.com/search.naver?where=nexearch&sm=top_hty&fbm=1&ie=utf8&query=wti"         ie.Navigate strURL         ie.Visible = False         Do While (ie.ReadyState <> READYSTATE_COMPLETE Or ie.Busy = True)             DoEvents         Loop         Application.Wait (Now + TimeValue("00:00:01"))         wti_temp_1 = ie.document.getElementsByClassName("spt_con").Item.innerText         wti_temp_2 = Right(wti_temp_1, Len(wti_temp_1) - 2)       ...

 - 분기배당주 정리(증권사, 은행주 제외)  - 굳이 2개 뽑자면 SK텔레콤과 아이마켓코리아  - 쌍용C&E는 요즘 건설 경기가 불투명하여 제외  - 삼성전자보다 SK텔레콤이 배당률은 좋음 (투자의 책임은 항상 본인에게 있음)

ISA  계좌의 투자 금액은 얼마로 해야 할까 ?  - 배당 투자일 경우 2,500 만 원이 적당하고 판단됨 ISA(Indivisual Savings Account): 개인종합자산관리계좌 그러면 년  30 만 원 세금 절약할 수 있음 생각보다는 크지 않네 이것은 오로지 배당 투자만 했을 때 해당함   ISA 장점 : 배당금 200 만 원까지 비과세 ISA 단점 : 최소 3 년 묶임 (3 년짜리 예금이라고 생각하면 됨 )