{"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fhiko-blog.hatenadiary.com%2Fentry%2F2024%2F10%2F12%2F131904\" title=\"\u3042\u3044\u307e\u3044\u691c\u7d22\u3000Excel\u7d4c\u7531Access - Hiko.Blog  Excel VBA\u6d3b\u7528\u8853\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_name":"Hatena Blog","width":"100%","description":"'//-------------------- ' Access\u306eVBA\u30e2\u30b8\u30e5\u30fc\u30eb\u306b\u8ffd\u52a0Function GetDataFromOracle(searchCondition As String) As Variant Dim conn As Object Dim rs As Object Dim data As Variant Dim i As Integer, j As Integer Dim sql As String ' ADO\u63a5\u7d9a\u3092\u4f5c\u6210 Set conn = CreateObject(\"ADODB.Connection\") ' \u63a5\u7d9a\u6587\u5b57\u5217\u3092\u8a2d\u5b9a\uff08\u9069\u5207\u306b\u5909\u66f4\u3057\u3066\u304f\u3060\u3055\u3044\uff09 conn.Co\u2026","published":"2024-10-12 13:19:04","author_name":"hiko-blog","version":"1.0","title":"\u3042\u3044\u307e\u3044\u691c\u7d22\u3000Excel\u7d4c\u7531Access","categories":["Access","VBA"],"blog_url":"https://hiko-blog.hatenadiary.com/","image_url":null,"author_url":"https://blog.hatena.ne.jp/hiko-blog/","provider_url":"https://hatena.blog","type":"rich","height":"190","url":"https://hiko-blog.hatenadiary.com/entry/2024/10/12/131904","blog_title":"Hiko.Blog  Excel VBA\u6d3b\u7528\u8853"}