Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


4720 / 76732 ←次へ | 前へ→

【77628】Re:VBA初心者
お礼  井上  - 15/11/12(木) 12:49 -

引用なし
パスワード
   分かりにくい私の説明の中、親切にご返答してくださり有難うございます。
課題は英文なんです。。


Write a function that receives a row number and a column number, finds the last row with data in that column, and returns the row number of the last row with data to the calling sub. Write a sub to test the function and display the number of the last row with data.

おそらく、そのような答えを教授が求めていると思います。

本当に有難うございましたm−ーm

▼ウッシ さん:
>こんにちは
>
>課題が英文なんでしょうか?
>
>想像で、
>
>Function test(r As Long, c As Long) As Variant
>'=test(1000,1)とすると
>'1列目の1000行まで調べて最後の値を表示する
>  Dim i As Long
>  test = ""
>  For i = 1 To r
>    If Cells(i, c) = "" Then
>      Exit For
>    End If
>    test = Cells(i, c)
>  Next
>End Function
>
>こんな事でしょうか?

0 hits

【77623】VBA初心者 井上 15/11/12(木) 7:34 質問[未読]
【77624】Re:VBA初心者 ウッシ 15/11/12(木) 9:10 質問[未読]
【77625】Re:VBA初心者 井上 15/11/12(木) 9:29 発言[未読]
【77626】Re:VBA初心者 β 15/11/12(木) 10:30 発言[未読]
【77627】Re:VBA初心者 ウッシ 15/11/12(木) 11:26 回答[未読]
【77628】Re:VBA初心者 井上 15/11/12(木) 12:49 お礼[未読]
【77631】Re:VBA初心者 ウッシ 15/11/12(木) 14:32 回答[未読]
【77632】Re:VBA初心者 ウッシ 15/11/12(木) 14:37 発言[未読]
【77629】Re:VBA初心者 井上 15/11/12(木) 12:52 お礼[未読]
【77630】Re:VBA初心者 β 15/11/12(木) 14:13 発言[未読]

4720 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free