こんにちは~ドットコムパソコン塾の徳丸ですニコニコ

 

今日は簡単なマクロのお話ですウインク

 

下図をご覧ください。

 

こちらも知恵袋で解答したものです

とりあえず、今日はこの問題を解いてみましょうウインク

 

問題

100万円以上売り上げていない人の売り上げを消します。ポーン

 

マクロのコードは以下のとおりです。

Sub Sample2()
    Dim c As Range
   
    For Each c In Cells.SpecialCells(xlCellTypeConstants, 1)
        If Len(c) < 7 Then
            c.ClearContents
        End If
    Next c
 End Sub

 

マクロを実行すると下図のようになりますウインク

 

できましたか?

これではちょっと簡単すぎるので~滝汗

100万円以上売り上げた方の氏名と売上金額をD列とE列に取り出しましょう~音譜

それを次回までに考えておいていただきたいですニコニコ

 

上図のように作成してみてくださいウインク

答えは次回のブログでUP致します~ウインク

お楽しみに~~~~

いのししいのししいのししいのししいのししいのししいのししいのししいのししいのししいのししいのししいのししいのししいのしし

HPはこちら

〒503-0204
岐阜県安八郡輪之内町四郷211-1
ドットコム・パソコン塾
TEL:0584-69-3839
開校日:月曜日~土曜日8:00~13:00
プライベートレッスン:月曜日~土曜日13:00~17:00
休校日:日曜日・祝日

コアラコアラコアラコアラコアラコアラコアラコアラコアラコアラコアラコアラコアラコアラコアラ