excel用VBA将文本字符串的首字母变成大写

摘要：

下面的VBA代码可以将活动工作表中的所有文本字符串的首字母改为大写，对包含公式单元格则不作更改。

excel获取屏幕分辨率的VBA代码

用下面的代码可以获取屏幕分辨率，需将其放入模块中运行。1.按Alt F11打开VBA编辑器。2.单击菜单插入模块，在模块中输入下列代码并运行：DeclareFunctionGetSystemMetrics32Libuser32_AliasGetSyst

Sub CapitalizeFirstLetter()
Dim Rng As Range
ActiveSheet.UsedRange.Select
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
Rng.Value = Application.WorksheetFunction.Proper(Rng.Value)
End If
Next Rng
End Sub

excel利用VBA生成无重复无空值的数据有效性下拉列表

在Excel工作表的某个单元格中应用数据有效性设置来制作下拉列表时，如果引用的行或列区域中包含空单元格或重复项，那么在有效性下拉列表中会与原区域中的内容完全相同，也会包含空值或