{"title":"Excel VBA\u3067\u914d\u5217\u306e\u9577\u3055\u3092\u53d6\u5f97","categories":["excel","vba"],"published":"2010-12-13 00:00:01","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fphithon.hatenablog.jp%2Fentry%2F20101213%2Fexcel_vba_array_length\" title=\"Excel VBA\u3067\u914d\u5217\u306e\u9577\u3055\u3092\u53d6\u5f97 - phithon\u306e\u30d6\u30ed\u30b0\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","url":"https://phithon.hatenablog.jp/entry/20101213/excel_vba_array_length","image_url":null,"provider_name":"Hatena Blog","author_url":"https://blog.hatena.ne.jp/phithon/","blog_title":"phithon\u306e\u30d6\u30ed\u30b0","width":"100%","description":"VBA\u306b\u306f\u914d\u5217\u306e\u9577\u3055\u3092\u53d6\u5f97\u3059\u308bLength\u3068\u3044\u3063\u305f\u30e1\u30bd\u30c3\u30c9\u304c\u5b58\u5728\u3057\u306a\u3044\u3002 \u305d\u3082\u305d\u3082\u914d\u5217\u306b\u30e1\u30bd\u30c3\u30c9\u304c\u5b58\u5728\u3059\u308b\u306e\u304b\u3069\u3046\u304b\u3082\u602a\u3057\u3044\u3002 \u914d\u5217\u306e\u9577\u3055\u3092\u76f4\u63a5\u6c42\u3081\u308b\u95a2\u6570\u3082\u5b58\u5728\u3057\u306a\u3044\u305f\u3081\u3001\u4ee5\u4e0b\u306e\u95a2\u6570\u3092\u5229\u7528\u3059\u308b\u3002 LBound \u914d\u5217\u306e\u6700\u5c0f\u30a4\u30f3\u30c7\u30c3\u30af\u30b9\u3092\u53d6\u5f97 UBound \u914d\u5217\u306e\u6700\u5927\u30a4\u30f3\u30c7\u30c3\u30af\u30b9\u3092\u53d6\u5f97 Sub PrintArray() Dim spl() As String spl = Split(\"a,b,c\", \",\") ' [\"a\",\"b\",\"c\"]\u3068\u3044\u3046\u914d\u5217\u3092\u751f\u6210 Debug.Print UBound(spl) - LBound(spl) + 1 ' \u914d\u5217\u306e\u9577\u3055\u3092\u53d6\u5f97\u3057\u305f\u3044\u5834\u5408 Dim i As Inte\u2026","type":"rich","height":"190","provider_url":"https://hatena.blog","blog_url":"https://phithon.hatenablog.jp/","author_name":"phithon","version":"1.0"}