テキスト名をエクセルに出力したい(python, for)

Question

ディレクトリに存在するテキスト(im.txt, im2.txt・・・など)の拡張子を抜いてエクセルのB列に出力したいと考えています(B1, B2・・・→im, im2・・・のように)。
ここではim.txtおよびim2.txtの2つのテキストに対して以下のプログラムを作動させてみたのですが、
B1,B2に「im」が、B3からB5に「im2」が出力されてしまいました・・・。
どなたか原因を教えていただけませんか。

###テキスト名をエクセルのB列に出力したい
###1.拡張子なしでファイル名を取得
###2.for文よりエクセルにテキスト名をのせる

import glob
import openpyxl as px
import os

os.chdir('C:\')

a = glob.glob("*.txt")

wb = px.Workbook()
ws = wb.active

j=1
for p in a:
    name = os.path.splitext(os.path.basename(p))[0]
    for i in name:
        ws.cell(row=j,column=2).value = name
        j += 1

wb.save('samp.xlsx')

Answer 1

for文が一個余計で、for i in nameだとnameの文字数分書き込んでしまうようです。

import glob
import openpyxl as px
import os

os.chdir('C:\')

a = glob.glob("*.txt")

wb = px.Workbook()
ws = wb.active

j=1
for p in a:
    name = os.path.splitext(os.path.basename(p))[0]
    ws.cell(row=j,column=2).value = name
    j += 1

wb.save('samp.xlsx')

Comments

[usuke]

なるほど、ご回答ありがとうございました。