摘要： Private Sub CommandButton1_Click()'Content.Text = Replace(Content.Text, "Tele Extn: ;", "Tele Extn: " & Extn.Text & " ;")'Content.Text = Replace(Content.Text, "Floor: ;", "Floor: " & Floor.Text & " ;")Cells(10, 2) = 阅读全文