{"url":"https://3ryupg.hatenablog.com/entry/2018/02/23/190000","height":"190","provider_url":"https://hatena.blog","blog_url":"https://3ryupg.hatenablog.com/","image_url":null,"title":"(OpenOffice Basic)\u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u306e\u6700\u7d42\u66f4\u65b0\u65e5\u6642\u3092\u77e5\u308a\u305f\u3044","author_url":"https://blog.hatena.ne.jp/deloreanmc12/","provider_name":"Hatena Blog","author_name":"deloreanmc12","width":"100%","type":"rich","published":"2018-02-23 19:00:00","version":"1.0","categories":["OpenOfficeBasic","\u30de\u30af\u30ed","OpenOffice"],"blog_title":"3\u6d41\u30d7\u30ed\u30b0\u30e9\u30de\u306e\u30e1\u30e2\u66f8\u304d","description":"\u30bb\u30eb\u306e\u4e2d\u306b\u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u306e\u6700\u7d42\u66f4\u65b0\u65e5\u6642\u3092\u5165\u308c\u305f\u3044\u3068\u3044\u3046\u8a71\u3067\u3059\u3002 \u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u30d1\u30b9\u306f\u3001(OpenOffice Basic)\u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u30d1\u30b9\u3092\u8868\u793a\u3059\u308b\u306e\u65b9\u6cd5\u3067\u53d6\u5f97\u3067\u304d\u307e\u3059\u3002 \u30d5\u30a1\u30a4\u30eb\u306e\u66f4\u65b0\u65e5\u6642\u306f\u3001FileDateTime \u95a2\u6570\u3067\u53d6\u5f97\u3067\u304d\u308b\u3088\u3046\u3067\u3059\u3002 \u3068\u3046\u3044\u3053\u3068\u3067\u3001\u4e0b\u8a18\u306e\u3088\u3046\u306a\u30b3\u30fc\u30c9\u306b\u306a\u308a\u307e\u3059\u3002 Sub GetLastFileDate1() Dim oCell As Object '\u7d50\u679c\u3092\u4fdd\u5b58\u3059\u308b\u30bb\u30eb\u8a2d\u5b9a oCell = ThisComponent.Sheets(\"Sheet1\").getCellRangeByName(\"A2\") Dim oUrl As String '\u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u53d6\u5f97\u2026","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2F3ryupg.hatenablog.com%2Fentry%2F2018%2F02%2F23%2F190000\" title=\"(OpenOffice Basic)\u81ea\u8eab\u306e\u30d5\u30a1\u30a4\u30eb\u306e\u6700\u7d42\u66f4\u65b0\u65e5\u6642\u3092\u77e5\u308a\u305f\u3044 - 3\u6d41\u30d7\u30ed\u30b0\u30e9\u30de\u306e\u30e1\u30e2\u66f8\u304d\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>"}