もし、A5が総計だったらシートを削除して そうでなければhiduke関数を実行して iがSheetCountになるまで実行したいのだが、、、ActiveSheets.Deleteでシートを削除した分 iのカウントが不足してしまってエラーがおきる。 For i = 2 To SheetCount Sheets(i).…

JANコード - Wikipedia (http://ja.wikipedia.org/wiki/JAN%E3%82%B3%E3%83%BC%E3%83%89) Bloglines | ログアウト (http://www.bloglines.com/logout) バーコードの体系 (http://www.technical.jp/handbook/chapter-4-10.html) 計算式(文字列操作の例:JANコ…