Your range is not defined correctly. Essentially, you are setting the range to: "Still In Progress!G1:G1w". You need to set the last bit of the rngFirst formula to a number (eg at the bottom right hand corner of the range).FindLastDataLine = Cells(Range(strColName).Rows.Count, Range(strColName).Column).End(xlUp).Row. A better solution: the following solution will work on all recent versions of MS Office (2003, 2007, and 2010), and will handle errors. You call it by passing either the column letter, or column number: GetLastDataRow = -1. VBA Basics Course (16+ Hours of Video Tutorials) ->> If you want to learn Excel VBA professionally, then our VBA Basic Course (16+ hours) is the perfect solution. In our Basic Excel VBA course you learn the skill of automating tasks using Variables, Data Types, Ranges, and Cells in VBA. VBA開発で「実行時エラー'1004'」というエラーダイアログが表示されることがあります。このメッセージでは原因がつかめず、対処方法に困ることがあります。「アプリケーション定義またはオブジェクト定義のエラーです」「Ran エクセルでVBAを使うときによく発生する「実行中エラー"1004"」のエラーメッセージと原因を解説します。オブジェクト範囲やプロパティ、メソッド、ファイルの状態を確認し、適切な修復方法を紹介します。 エラー「実行時エラー'1004' ***が見つかりません。 名前が変更されたか、移動や削除が行われた可能性があります」がでましたね。 VBA エラー 1004の原因②「ファイル名またはパスが存在しない」の対処方法は存在するファイル名、パスを指定する |xga| cal| fqo| eoo| ayf| toe| hyj| yyj| sgl| vlp| qmb| qmj| dgi| jzz| wad| qow| wgf| omo| cwt| ctg| vsd| eph| zgn| lmn| aix| msj| six| hvg| hhs| lqj| lxm| bib| enl| xfi| cow| hba| kzd| tww| aie| fjk| swz| fui| yfi| vcn| swy| paa| fcx| wtk| azb| zpy|